需要下载以下两个dll文件。。。
psvince.dll istask.dll
以下两个dll是为了调用函数而使用。。
[Files]
Source: psvince.dll; Flags: dontcopy
Source: ISTask.dll; Flags: dontcopy
判断进程中的 XXX.exe 是否存在,然后关闭 XXX.exe 。。
[Code]
function IsModuleLoaded(modulename: AnsiString ): Boolean;
external 'IsModuleLoaded@files:psvince.dll stdcall';
function KillTask(ExeFileName: string): Integer;
external 'KillTask@files:ISTask.dll stdcall delayload';
function InitializeSetup():Boolean;
begin
if (IsModuleLoaded('XXX.exe')) then
begin
KillTask('XXX.exe');
Result :=true;
end;
end;