Question

怎么在DELPHI程序中执行DOS命令

怎么在DELPHI程序中执行DOS命令,我看过一个程序代码,好像用了WINEXEC,能不能说详细点,我是新手

Answer 1

方法一
uses WinProcs;
……
begin
WinExec(......);
……
end.
和调用Pascal库函数没什么两样。
方法二
用ShellExecute更好，在USES段加入SHELLAPI，使用时如：
执行"c:\myapp\myapp.exe"参数为"-s"
ShellExecute(handle,'open','c:\myapp\myapp.exe','-s','',SW_SHOWNORMAL);
第一个参数为父窗口句柄；
第二个参数为打开方式（OPEN，PRINT两种）；
第三个参数为执行文件全路径；
第四个参数为执行文件参数；
第五个参数为执行文件开始运行时的初始目录；
第六个参数为为执行文件运行方式(SW_HIDE,SW_MAXIMIZE,SW_MINIMIZE,
SW_RESTORE,SW_SHOW,SW_SHOWDEFAULT,SW_SHOWMAXIMIZED,SW_SHOWMINIMIZED,
SW_SHOWMINNOACTIVE,SW_SHOWNA,SW_SHOWNOACTIVATE,SW_SHOWNORMAL);
具体请看帮助。另外，如果为字符串参数，其中包含变量或运算的必需用PCHAR（）函数。