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ÌÐò×Ô¶¯Ð´¡£¡£¡£¡£¡£¡£¡£Õâ¸ö²î±ðºÜ´óµÄ
ÎÒÊÇ×Ô¼ºÔÚ³ÌÐòÀïдµÄ£¬ÊäÈë½øÈ¥¡£
Óû§²»»áÔÚÀïÃæÊäÈëÈκζ«Î÷¡£
ÒýÓÃ
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬ Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
ÎÒÊÇDELPHIµÄ³õѧÕߣ¬µ«ÀÏʦҪÇóÎÒÃÇ×ö¿Î³ÌÉè¼Æ£¬´ÓÊé±¾ÀïÃ濽ÁË´úÂë×Ô¼ºÑо¿£¬µ«ÀÏÊdzöÎÊÌ⣬ÓÐËÊÇÕâ·½ÃæµÄ¸ßÊÖ°¡£¬ÄÜ·ñÁôϸöÁªÏµµÄ·½Ê½°ï°ïæ°¡ ³öʲôÎÊÌ⣬Çë¾ßÌå˵Ã÷ ·¢ÏÖ¡¢½â¾öÎÊÌâµÄ¹ý³Ì¾ÍÊÇѧϰµÄ¹ý³Ì
......
±¾È˽ñÄê17Ëê,·Ç³£Ï²»¶delphi,µ«ÓÉÓÚ»ù´¡ÓÐÏÞ,´ÓÍøÉÏÏÂÔØ×ÊÁÏѧϰ,¿´µÃÔÎËÀÁË,¶¼²»ÖªµÀÔÚ˵ʲô!ËùÒÔ½ñÌìÔÚ´Ë·¢Ìû,¹ãÑû¸÷λdelphi°®ºÃÕß°ïÖúÎÒ!Èç¹û±¾ÈËËûÈÕÓÐÐÒѧµÃdelphi±à³Ì,¶¨µ±°ÑÔ´´úÂë·¢²¼³öÀ´,ÔÚ´ËÒ»±í¸Ðл!Ï ......