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

时间:2016-06-12 11:06:34

标签: inno-setup

我正在尝试使用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首先显示然后安装。欢迎页面不显示!

1 个答案:

答案 0 :(得分:15)

Inno Setup 5.5.7以来,默认情况下跳过欢迎页面:

  

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

要显示它,您必须设置:

[Setup]
DisableWelcomePage=no