Inno Setup制作安装包--调用外部程序

安装后自动运行一个，卸载时关闭一个程序（这个程序是软件的一部分，就需要这样操作）

[Code]
var
  ErrorCode: Integer;
  IsRunning: Integer;

//安装完成运行一个后台程序

procedure DeinitializeSetup();
begin
  ShellExec('open', ExpandConstant('{pf}') +'\ASS\PP.exe', '', '', SW_Hide, ewNoWait, ErrorCode);
end;

//卸载时判断客户端是否正在运行
function InitializeUninstall(): Boolean;
begin
  Result := true; //安装程序继续

//PP.exe程序需要处理close 参数的代码
  ShellExec('open', ExpandConstant('{pf}') +'\FDSPS\ks.exe', 'close', '', SW_HIDE, ewNoWait, ErrorCode);

end;

 

来自东子哥的Blog