如何在过程 InitializeWizard() 中显示自定义页面之前显示 Inno Setup 许可证页面

Question

我用来LicenseFile=D:\authorized\Builds\Integration\License.rtf显示许可证页面和程序InitializeWizard()。

问题是在该过程之后显示许可证页面InitializeWizard()。有什么办法可以让我们之前显示它吗？

procedure InitializeWizard;
begin
  // Create the pages
  UsagePage := CreateInputOptionPage(wpWelcome,
    'App setup information', 'How would you like to install App?',
    'Would you like to install App as a service?.',
    True, False);
  UsagePage.Add('Yes');
  UsagePage.Add('No');
  UsagePage.Values[0] := true;
end;

Answer 1

这是一个误会。该InitializeWizard函数不显示任何内容。它只是创建自定义页面，而不显示它们。

MsgBox尝试在函数末尾添加调用。您将看到该消息在向导表单弹出之前就已显示。

自定义页面的顺序由函数AfterID的参数（第一个）决定Create*Page。

如果您希望自定义页面显示在许可证页面之后，请使用wpLicense, 而不是wpWelcome。

UsagePage := CreateInputOptionPage(wpLicense, ...);