百分请教高手－－EXE问题

Question

在DELPHI程序中如何调用外部EXE程序(请给出详细的代码)，如蒙赐教，不胜感谢！

Answer 1

use ShellExecute API, see an example at
http://www.latiumsoftware.com/en/delphi/00002.phpuses ShellAPI;ShellExecute(Form1.Handle, nil, 'c:\windows\notepad.exe',
  nil, nil, SW_SHOWNORMAL);

Answer 2

CSDN第一人，见到不容易！　哈哈

Answer 3

另一中情形：
procedure TMainForm.FormDestroy(Sender: TObject);
Begin
  ShellExecute(0,'open','药品管理系统.exe',nil,nil,0);
end;

Answer 4

WinExec('c:\windows\notepad.exe',sw_show);

Answer 5

uses ShellAPI;WinExeC,最简单,但是它只能调用可执行程序；
　　ShellExecute，可以启动某一可执行程序,也可以启动与你给出的文件相关联的应用程序；
　　ShellExecuteEx，和上两者相似，不过传递的参数不一样一楼的MM........楼主幸福s

Answer 6

写个程序，使用CreateProcess函数， 假设你的mssqlserver的服务存放路径为：
"C:\Program Files\Microsoft SQL Server\80\Tools\Binn\sqlmangr.exe"var 
    PStartupInfo: TStartupInfo;
    aProcessInfo: TProcessInformation;
begin
  FillChar(PStartupInfo, SizeOf(PStartupInfo), 0);
  PStartupInfo.cb:=SizeOf(PStartupInfo);
  CreateProcess(nil,
  PChar('C:\Program Files\Microsoft SQL Server\80\Tools\Binn\sqlmangr.exe' CheckRun '),
  nil, nil, False, DETACHED_PROCESS, nil, nil, PStartupInfo, aProcessInfo);
  CloseHandle(aProcessInfo.hThread);
  CloseHandle(aProcessInfo.hProcess);
end;

Answer 7

具体delphi中也有例子写一个shellexecute 然后选中按f1