uses ShellAPI;procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle, nil, 'calc.exe', nil, nil, SW_SHOW);
WinExec('calc.exe', SW_SHOW);
end;
begin
ShellExecute(Handle, nil, 'calc.exe', nil, nil, SW_SHOW);
WinExec('calc.exe', SW_SHOW);
end;
UINT uCmdShow // window style for new application
);CmdShow Long,为窗口指定可视性方面的一个命令。请用下述任何一个常数
SW_HIDE 隐藏窗口,活动状态给令一个窗口
SW_MINIMIZE 最小化窗口,活动状态给令一个窗口
SW_RESTORE 用原来的大小和位置显示一个窗口,同时令其进入活动状态
SW_SHOW 用当前的大小和位置显示一个窗口,同时令其进入活动状态
SW_SHOWMAXIMIZED 最大化窗口,并将其激活
SW_SHOWMINIMIZED 最小化窗口,并将其激活
SW_SHOWMINNOACTIVE 最小化一个窗口,同时不改变活动窗口
SW_SHOWNA 用当前的大小和位置显示一个窗口,不改变活动窗口
SW_SHOWNOACTIVATE 用最近的大小和位置显示一个窗口,同时不改变活动窗口
SW_SHOWNORMAL 与SW_RESTORE相同
呵呵,不知帖了多少次了
中已有
PATH=C:\WINDOWS\;C:\WINDWOS\COMMAND所以你不需要加路径了