我正在尝试使用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首先显示然后安装。欢迎页面不显示!
答案 0 :(得分:15)
自Inno Setup 5.5.7以来,默认情况下跳过欢迎页面:
根据Microsoft的桌面应用程序指南的建议,
DisableWelcomePage
现在默认为yes
。 ...以前所有版本的默认值均为no
。
要显示它,您必须设置:
[Setup]
DisableWelcomePage=no