INNO setup安装卸载钱判断进程中是否在运行总结

最新推荐文章于 2024-03-15 15:01:41 发布

转载最新推荐文章于 2024-03-15 15:01:41 发布 · 140 阅读

本文介绍了一个用于Inno Setup的自定义DLL(psvince.dll)，该DLL用于在安装和卸载过程中检查特定进程(如WordTutor.exe)是否正在运行。通过外部函数IsModuleLoaded和IsModuleLoadedU，实现进程状态的判断，并通过消息框提示用户关闭运行中的程序，确保安装或卸载过程的顺利进行。

1.安装前判断进程中是否有程序在运行。

[files]

; 安装前判断进程，dll文件放在inno的安装目录中
Source: compiler:psvince.dll; Flags: dontcopy noencryption

[Code]
//安装前判断是否有进程正在运行
function IsModuleLoaded(modulename: String ): Boolean;
external 'IsModuleLoaded@files:psvince.dll stdcall setuponly';
function InitializeSetup(): boolean;
var
IsAppRunning: boolean;
begin
Result:= true;
IsAppRunning:= IsModuleLoaded('WordTutor.exe');
while IsAppRunning do
begin
if MsgBox('快乐背单词正在运行,请先关闭它!', mbConfirmation, MB_OKCANCEL) = IDOK then
IsAppRunning:= IsModuleLoaded('WordTutor.exe')
else
begin
IsAppRunning:= false;
Result:= false;
end;
end;
end;

2.卸载前判断进程中是否在运行。

// 卸载前判断进程是否在运行.与安装相同的dll文件和需要打包的安装文件放在一起，也就是和.exe文件一起

[code]

function IsModuleLoadedU(modulename: String ): Boolean;
external 'IsModuleLoaded@{app}\psvince.dll stdcall uninstallonly';
function InitializeUninstall(): boolean;
var
IsAppRunning: boolean;
begin
Result:= true;
IsAppRunning:= IsModuleLoadedU('WordTutor.exe');
while IsAppRunning do
begin
if MsgBox('快乐背单词正在运行,请先关闭它!', mbConfirmation, MB_OKCANCEL) = IDOK then
IsAppRunning:= IsModuleLoadedU('WordTutor.exe')
else
begin
IsAppRunning:= false;
Result:= false;
end;
end;
end;