如何让Inno Setup仅运行单实例且无提示直接关闭？

默认使用SetupMutex配置时，Inno Setup会自动弹出"已有一个安装实例在运行"的提示框，但如果你希望新实例直接静默关闭不打扰用户，可以通过手动在代码段处理互斥体来实现，具体步骤如下：

• 首先移除脚本中原来的SetupMutex配置项，因为我们要完全自定义互斥体的检查逻辑
• 在[Code]段中添加InitializeSetup事件处理函数，手动创建并检查互斥体：

[Code]
function InitializeSetup(): Boolean;
var
  MutexHandle: THandle;
begin
  // 定义唯一的互斥体名称，建议用你的公司/产品唯一标识，避免和其他程序冲突
  MutexHandle := CreateMutex(nil, False, 'MyUniqueAppSetupMutex');
  // 检查是否已有相同互斥体存在
  if (MutexHandle = 0) or (GetLastError() = ERROR_ALREADY_EXISTS) then
  begin
    // 已有实例运行，直接返回False让安装程序静默退出
    Result := False;
    if MutexHandle <> 0 then
      CloseHandle(MutexHandle);
  end
  else
  begin
    // 没有实例运行，保留互斥体句柄，继续执行安装流程
    Result := True;
  end;
end;

代码说明： #

• CreateMutex函数用于创建一个系统级互斥体，第二个实例尝试创建同名互斥体时会失败
• 通过GetLastError()判断是否是"已存在"的错误，如果是则直接返回False，安装程序会立即退出且不显示任何提示
• 最后要记得关闭互斥体句柄避免资源泄漏

这样配置后，当用户启动第二个安装实例时，程序会在后台直接关闭，完全不会弹出任何提示窗口，完美满足你的需求。

内容的提问来源于stack exchange，提问作者Inside Man