Inno Setup 禁用安装向导页面
Inno Setup disable Installing Wizard Pages
是否可以禁用准备安装 wpPreparing
和安装 wpInstalling
向导页面(即带有进度条的页面),以便它们在安装过程中不显示?似乎没有内置指令或方法(例如,对于就绪向导页面,您可以使用 DisableReadyPage=yes
来实现)。我是不是遗漏了什么,或者正如我怀疑的那样,根本不可能?
我已经尝试使用:
function ShouldSkipPage(CurPageID: Integer): Boolean;
begin
if CurPageID = wpPreparing then
Result := True;
if CurPageID = wpInstalling then
Result := True;
end;
您是否尝试过此操作 - [设置] 部分中的 DisableReadyPage=yes。
似乎唯一的其他选择是使用 "install silently" 命令行开关。我会小心,虽然这实际上是在用户不知情的情况下安装了一个具有潜在破坏性的程序。
无法跳过 wpPreparing
或 wpInstalling
向导页面。但是,如果安装程序实际上没有安装任何东西,而是用于 return 某些东西,比如解锁代码,就像这里的用例一样,则可以改为执行以下操作:
//Disable the Exit confirmation prompt
procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
Cancel := True;
Confirm := False;
end;
function NextButtonClick(CurPageID: Integer): Boolean;
begin
//Get the unlock code
if CurPageID = UnlockCodePage.ID then
begin
if UnlockCodePage.Values[0] = '' then
begin
MsgBox('You must enter an installation ID to generate an unlock code.',
mbError, MB_OK);
end
else
begin
UnlockCodePage.Values[1] := GetUnlockCode;
end;
Result := False;
end;
end;
procedure CurPageChanged(CurPageID: Integer);
begin
//Define button visibility, whether the Back button is enabled and change the Next and Cancel button labels
WizardForm.CancelButton.Caption := '&Close';
if CurPageID = UnlockCodePage.ID then
begin
WizardForm.BackButton.Enabled := False;
WizardForm.NextButton.Caption := '&Generate';
end;
end;
希望这对想要做类似事情的人有所帮助。
是否可以禁用准备安装 wpPreparing
和安装 wpInstalling
向导页面(即带有进度条的页面),以便它们在安装过程中不显示?似乎没有内置指令或方法(例如,对于就绪向导页面,您可以使用 DisableReadyPage=yes
来实现)。我是不是遗漏了什么,或者正如我怀疑的那样,根本不可能?
我已经尝试使用:
function ShouldSkipPage(CurPageID: Integer): Boolean;
begin
if CurPageID = wpPreparing then
Result := True;
if CurPageID = wpInstalling then
Result := True;
end;
您是否尝试过此操作 - [设置] 部分中的 DisableReadyPage=yes。
似乎唯一的其他选择是使用 "install silently" 命令行开关。我会小心,虽然这实际上是在用户不知情的情况下安装了一个具有潜在破坏性的程序。
无法跳过 wpPreparing
或 wpInstalling
向导页面。但是,如果安装程序实际上没有安装任何东西,而是用于 return 某些东西,比如解锁代码,就像这里的用例一样,则可以改为执行以下操作:
//Disable the Exit confirmation prompt
procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
Cancel := True;
Confirm := False;
end;
function NextButtonClick(CurPageID: Integer): Boolean;
begin
//Get the unlock code
if CurPageID = UnlockCodePage.ID then
begin
if UnlockCodePage.Values[0] = '' then
begin
MsgBox('You must enter an installation ID to generate an unlock code.',
mbError, MB_OK);
end
else
begin
UnlockCodePage.Values[1] := GetUnlockCode;
end;
Result := False;
end;
end;
procedure CurPageChanged(CurPageID: Integer);
begin
//Define button visibility, whether the Back button is enabled and change the Next and Cancel button labels
WizardForm.CancelButton.Caption := '&Close';
if CurPageID = UnlockCodePage.ID then
begin
WizardForm.BackButton.Enabled := False;
WizardForm.NextButton.Caption := '&Generate';
end;
end;
希望这对想要做类似事情的人有所帮助。