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ÌÐò×Ô¶¯Ð´¡£¡£¡£¡£¡£¡£¡£Õâ¸ö²î±ðºÜ´óµÄ
ÎÒÊÇ×Ô¼ºÔÚ³ÌÐòÀïдµÄ£¬ÊäÈë½øÈ¥¡£
Óû§²»»áÔÚÀïÃæÊäÈëÈκζ«Î÷¡£
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖÇ°±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
ÎÒÊÇDELPHIµÄ³õѧÕߣ¬µ«ÀÏʦҪÇóÎÒÃÇ×ö¿Î³ÌÉè¼Æ£¬´ÓÊé±¾ÀïÃ濽ÁË´úÂë×Ô¼ºÑо¿£¬µ«ÀÏÊdzöÎÊÌ⣬ÓÐËÊÇÕâ·½ÃæµÄ¸ßÊÖ°¡£¬ÄÜ·ñÁôϸöÁªÏµµÄ·½Ê½°ï°ïæ°¡
³öʲôÎÊÌ⣬Çë¾ßÌå˵Ã÷
·¢ÏÖ¡¢½â¾öÎÊÌâµÄ¹ý³Ì¾ÍÊÇѧϰµÄ¹ý³Ì
......
ÔÚÍøÉÏ¿´µ½ºÜ¶àÈËд³ÌÐò´úÂë,дµÄ´úÂëÿһÐж¼ÊÇҪô¾Í¿ÕÒ»¸ö¿Õ¸ñ,Ҫô¾Í¿ÕºÃ¼¸¸ö,Õâ¸öÓй涨Âð?Ôõô¿´?
ÒÔÏÂÊÇÎÒÔÚÍøÉÏÕÒµÄÒ»¶Î³ÌÐò´úÂë
===================================================================== ......
±¾È˽ñÄê17Ëê,·Ç³£Ï²»¶delphi,µ«ÓÉÓÚ»ù´¡ÓÐÏÞ,´ÓÍøÉÏÏÂÔØ×ÊÁÏѧϰ,¿´µÃÔÎËÀÁË,¶¼²»ÖªµÀÔÚ˵ʲô!ËùÒÔ½ñÌìÔÚ´Ë·¢Ìû,¹ãÑû¸÷λdelphi°®ºÃÕß°ïÖúÎÒ!Èç¹û±¾ÈËËûÈÕÓÐÐÒѧµÃdelphi±à³Ì,¶¨µ±°ÑÔ´´úÂë·¢²¼³öÀ´,ÔÚ´ËÒ»±í¸Ðл!Ï ......