Inno Setup - 如何在自定义卸载页面中创建新的卸载页面？

首先，我认为最好修改标准的卸载表单，而不是尝试从头开始实施新的卸载表单。

请参阅我对“自定义卸载”页面（而不是MsgBox）的回答。

无论如何，回答你的问题。是的，通过一些努力，这可能是可能的。

要隐藏主窗口并显示自定义窗口，请执行以下操作：

[Code]

var
  CustomUninstallForm: TSetupForm;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  if CurUninstallStep = usUninstall then
  begin
    UninstallProgressForm.Visible := False;
    { Move the hidden form back to the screen }
    { in a hope that eventual error messages will appear on screen }
    UninstallProgressForm.Left := CustomUninstallForm.Left;
    UninstallProgressForm.Top := CustomUninstallForm.Top;
  end;
end;

procedure InitializeUninstallProgressForm();
begin
  { Move the form away, so that it does not briefly flash on the window before the }
  { CurUninstallStepChanged(usUninstall) is called }
  UninstallProgressForm.Left := -1000;
  UninstallProgressForm.Top := -1000;

  { Create a custom form and display it }
  CustomUninstallForm := CreateCustomForm;
  CustomUninstallForm.SetBounds(
    0, 0, UninstallProgressForm.Width, UninstallProgressForm.Height);
  CustomUninstallForm.Position := poScreenCenter;  
  CustomUninstallForm.Show;
end;

• 我不知道在卸载过程中发生错误时会发生什么。
• 要将进度从主窗体传播到自定义窗体，请参阅Inno Setup 卸载进度条更改事件。