欢迎页面未显示,SelectDir页面首先显示

Question

我正在尝试使用Inno Setup制作安装程序.

我想首先显示欢迎页面,然后是SelectDir.

这是CurPageChanged示例代码:

procedure CurPageChanged(CurPageID: integer);
begin
  if CurPageID = wpWelcome then
  begin
    HideComponents;
    WLabel.show;
    WizardForm.NextButton.Show;
    WizardForm.NextButton.Caption := 'Configure';
  end;

  if CurPageID = wpSelectDir then
  begin
    HideComponents;

    BmpFile.Bitmap.LoadFromFile(ExpandConstant('{tmp}\2.bmp'));
    WizardForm.DirEdit.Show;
    WizardForm.NextButton.Show;
    WizardForm.NextButton.Caption := 'Install';
    WizardForm.DirBrowseButton.Show;
    TasksSeparateBevel.Show;
    TasksSeparateBevel2.Show;
    InstallpathLabel.Show;
    DiskSpaceLablel.Show;
    ShortcutLabel.Show;
    ShortcutCB.Show;
    CreateDLabel.Show;
  end;

  if CurPageID = wpInstalling then
  begin
    HideComponents;

    MakeSlideShow;
    TimerID := SetTimer(0, 0, 10000, WrapTimerProc(@OnTimer, 4));

    WizardForm.CancelButton.show;
    WizardForm.ProgressGauge.show;
  end;
end;

但SelectDir首先显示然后安装.欢迎页面不显示!

Answer 1

默认情况下,从Inno Setup 5.5.7开始跳过欢迎页面:

根据Microsoft的桌面应用程序指南的建议,DisableWelcomePage现在默认为yes....以前所有版本的默认值都是no.

要显示它,你必须设置:

[Setup]
DisableWelcomePage=no