DELPHIÈçºÎÏò CMDÀï·¢ËÍÃüÁî¡£²»Êǵ÷ÓñðµÄ³ÌÐò£¬¶øÊÇÔÚÀïÃæÐ´Ò»Ð©´ø²ÎÊýµÄÃüÁÈ磺ipconfig/all
×Ô¼º¶¥Ò»ÏÂ
Shellexecute ,ºóÃæÓиö´ø²ÎÊýµÄ
createprocess Ò²¿ÉÒÔ´ø²ÎÊý
WinExec(PChar( 'cmd /k dir '),SW_SHOWNORMAL)
¾ÍÏñÕâÑù
WinExec
Èç¹ûÐèÒª¸ü¶àµÄ²Ù¿ØÐÔ£¬¿ÉÒÔʹÓà DosCommand.TDosCommand
winexec »òshellexecute
winexec »òshellexecute
delphiµ÷ÓÃcmdµÄÁ½ÖÖ·½·¨
1
var
s:string;
begin
s:='cmd.exe /c '+edit1.Text+' >c:\1.txt'; //½«½á¹û±£´æµ½c:\1.txt
winexec(pchar(s),sw_hide);
sleep(2000);
memo1.Lines.LoadfromFile('c:\1.txt');
2
shellexecute(handle,nil,'cmd.exe',pchar(form2.edit1.text),nil,sw_hide);
WinExecÖ÷ÒªÔËÐÐEXEÎļþ¡£È磺WinExec(¡¯Notepad.exe Readme.txt¡¯, SW_SHOW);
ShellExecute²»½ö¿ÉÒÔÔËÐÐEXEÎļþ£¬Ò²¿ÉÒÔÔËÐÐÒѾ¹ØÁªµÄÎļþ¡£
Ê×ÏȱØÐëÒýÓÃshellapi.pasµ¥Ôª£ºuses ShellAPI;
ShellExecuteº¯ÊýÔÐͼ°²ÎÊýÈçÏ£º
function ShellExecute(hWnd: HWND; Operation, FileName, Parameters,Directory: PChar; ShowCmd: Integer): HINST; stdcall;
¸Ðл¸÷룬ÆäʵÒÔÉϵĺ¯ÊýÎÒ¶¼ÊÔÁË£¬Ò»Öª°ë½âµÄ£¬
ÆäʵÎÒÏëʵÏÖµÄЧ¹ûºÜ¼òµ¥£¬
µÚÒ»²½£ºµ÷³öCMD´°¿Ú
µÚ¶þ²½£ºÔÚÀïÃæÐ´ÈëÃüÁî²¢»Ø³µ
µÚ¶þ²½£ºÔÚÀïÃæÐ´ÈëÃüÁî²¢»Ø³µ£¿
ÊÇ Óû§Ð´£¬»¹ÊdzÌÐò×Ô¶¯Ð´¡£¡£¡£¡£¡£¡£¡£Õâ¸ö²î±ðºÜ´óµÄ
ÎÒÊÇ×Ô¼ºÔÚ³ÌÐòÀïдµÄ£¬ÊäÈë½øÈ¥¡£
Óû§²»»áÔÚÀïÃæÊäÈëÈκζ«Î÷¡£
ÒýÓÃ
±¾È˽ñÄê17Ëê,·Ç³£Ï²»¶delphi,µ«ÓÉÓÚ»ù´¡ÓÐÏÞ,´ÓÍøÉÏÏÂÔØ×ÊÁÏѧϰ,¿´µÃÔÎËÀÁË,¶¼²»ÖªµÀÔÚ˵ʲô!ËùÒÔ½ñÌìÔÚ´Ë·¢Ìû,¹ãÑû¸÷λdelphi°®ºÃÕß°ïÖúÎÒ!Èç¹û±¾ÈËËûÈÕÓÐÐÒѧµÃdelphi±à³Ì,¶¨µ±°ÑÔ´´úÂë·¢²¼³öÀ´,ÔÚ´ËÒ»±í¸Ðл!Ï ......
ÏÖÓÐparadoxÊý¾Ý¿âʹÓÃBDEÇý¶¯£¬Äâ¸ÄΪC/S°æ£¬Ôö¼ÓÍøÂç¶ÁÈ¡Êý¾Ý¹¦ÄÜ¡£ÇëÄÄλ´óÏÀ£¬ÌṩԴÂë¡£ ˵¾ä²»¿ÍÆøµÄ»°£¬ÓÃparadox×öC/SÊÇ×ÔѰËÀ·¡£ »»Ò»¸öÍøÂçÊý¾Ý¿â ÒòΪ²»Ï붯´óÊÖÊõ£¬½öÄܹ²Ïí¼¸¸öÎļþ¼´¿É¡£ Da ......
ÔÚÎÒµçÄÔÉÏÔËÐÐDelphiµÄʱºò¾³£³öÏîÕâÖÖÇé¿ö£º¹Ø±ÕÔËÐд°¿Úʱ£¬µçÄÔËÀ»ú£¬Êó±êÄܶ¯£¬¸è»¹ÄÜÌý£¬µ«Ê²Ã´¶¼×ö²»ÁË£¬Ö»ÄÜÖØÆô¡£ÕâÊÇʲôÎÊÌ⣿Çë¸÷λ°ï°ï棬ллÁË£¡ Ò²¿ÉÄÜÊÇÄãÔËÐеÄÎļþÓÐÎÊÌâ¡£ Äã´ò¿ªdelphi£¬Ê² ......