Inno Setup - 自定义安装页面答案

【问题标题】：Inno Setup - Customize installing pageInno Setup - 自定义安装页面
【发布时间】：2017-06-29 21:28:49
【问题描述】：

如何自定义 Inno Setup 的安装页面？

此处准确显示了将要进行的更改。

之前

之后

现在，状态文本“正在安装 Collectica”将是静态的，而不是动态的。

另外，为进度条添加额外的时间。

我会很感激你的回答。谢谢

【问题讨论】：

“额外时间” 部分值得更多解释，并且可能是一个单独的问题。

标签： inno-setup

【解决方案1】：

你必须自定义WizardForm.InstallingPage:

隐藏FilenameLabel 和StatusLabel
添加自定义标签
添加图片

对于前两个：

procedure InitializeWizard();
var
  CustomStatusLabel: TNewStaticText;
begin
  WizardForm.FilenameLabel.Visible := False;
  WizardForm.StatusLabel.Visible := False;

  WizardForm.ProgressGauge.Top := WizardForm.InstallingPage.Height - ScaleY(60);

  CustomStatusLabel := TNewStaticText.Create(WizardForm);
  CustomStatusLabel.Parent := WizardForm.InstallingPage;
  CustomStatusLabel.Caption := 'Installing Colectica';
  CustomStatusLabel.Font.Size := CustomStatusLabel.Font.Size + 4;
  CustomStatusLabel.Font.Style := [fsBold];
  CustomStatusLabel.AutoSize := True;
  CustomStatusLabel.Top :=
    WizardForm.ProgressGauge.Top - CustomStatusLabel.Height - ScaleY(8);
  CustomStatusLabel.Left :=
    WizardForm.ProgressGauge.Left +
    ((WizardForm.ProgressGauge.Width - CustomStatusLabel.Width) div 2);
end;

图片见：
Inno Setup Placing image/control on custom page

【讨论】：

探索关于 Inno 的想法我找到了这个，谢谢。