Question

delphi 如何带命令调用控制台程序

m就是要执行的命令直接复制到开始运行栏能执行成功用delphi调用cmd再执行就不能成功，窗口只显示到控制台程序的路径。不执行命令。 ShellExecute (Handle,nil,'cmd.exe',pchar('c:\oper\diroa.exe-u'+b),nil,SW_NORMAL);//不执行命令
winexec(PChar('c:\oper\diroa.exe-u'+b),sw_show);//不执行命令
winexec(pchar('c:\oper\diroa.exe-u '+b),sw_show);//不执行命令
WinExec(PChar( 'c:\oper\diroa.exe-u '+b),SW_SHOWNORMAL) ;//不执行命令 //-U都不执行，只看到打开了了C:\oper路径 diroa不是系统中的程序，是网上下的控制台程序，在开始-运行里面'c:\oper\diroa.exe-u '+b 这个能执行成功。

Answer 1

因为你的cmd路径默认不对的。要先写cd c:在执行你的代码，最好写个批文件。

Answer 2

如果是单独的DOS程序，就不要调用cmd

Answer 3

ShellExecute (Handle,'open',pchar('c:\oper\diroa.exe'),pchar('-u'+b),'c:\oper\',SW_NORMAL);//不执行命令