Inno脚本声明CurPageChanged时的异常抛出异常问题

我明白你遇到的困扰了——只要声明了空的CurPageChanged过程，SetupOperation里的异常就没法正常触发安装中止，注释掉这个过程就一切正常。这其实和你中止安装的方式有关，直接调用WizardForm.Close不是Inno Setup推荐的中止流程的方法，再加上CurPageChanged存在时的页面切换逻辑干扰，就导致了异常处理失效。

问题根源 #

当你在AfterInstall事件里直接调用WizardForm.Close，Inno Setup的内部页面管理机制（尤其是当CurPageChanged存在时）会优先处理页面变更相关的逻辑，反而打断了异常的传播链。而当你注释掉CurPageChanged后，这个额外的页面事件逻辑不参与，异常才能正常触发安装程序的内置中止流程。

解决方案：使用标准中止方法替代直接关闭窗口 #

Inno Setup提供了专门的Abort()函数来中止安装流程，这是官方推荐的方式，无论是否声明CurPageChanged，都能正确触发安装中止。同时可以简化你的异常处理逻辑，避免不必要的嵌套重新抛出。

修改后的SetupOperation过程示例：

procedure SetupOperation();
begin
  Log('SetupOperation called');
  try
    SharedProgressPage.SetText('', '');
    SharedProgressPage.Show;
    try
      SharedProgressPage.SetText('Performing operation...', '');
      RaiseException('Some weird error');
    finally
      Log('Closing progress page');
      SharedProgressPage.Hide;
    end;
  except
    Log('An error occurred performing the operation: ' + GetExceptionMessage());
    // 用Abort()替代WizardForm.Close，触发标准安装中止流程
    Abort();
  end;
end;

如果你想在中止前给用户更友好的提示，可以先弹出错误消息框再调用Abort()：

except
  Log('An error occurred performing the operation: ' + GetExceptionMessage());
  MsgBox('安装失败：' + GetExceptionMessage(), mbError, MB_OK);
  Abort();
end;

额外说明 #

即使保留CurPageChanged过程（哪怕是空的），使用Abort()也能正常工作，因为它是Inno Setup内置的中止信号，会被安装程序的核心逻辑优先处理，不会被页面变更事件干扰。

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