是否可以禁用“准备安装”wpPreparing
和“安装wpInstalling
向导”页面(即带有进度栏的页面),以使其在安装过程中不显示?似乎没有内置的指令或方法(例如,对于“就绪向导”页面,您可以使用DisableReadyPage=yes
它)。我是否缺少某些东西,或者我怀疑这根本不可能?
我已经尝试使用:
function ShouldSkipPage(CurPageID: Integer): Boolean;
begin
if CurPageID = wpPreparing then
Result := True;
if CurPageID = wpInstalling then
Result := True;
end;
不能跳过wpPreparing
或wpInstalling
向导页面。但是,如果安装程序实际上未安装任何东西,而是用于返回某些内容(例如解锁代码)(如此处的用例所示),则可以执行以下操作:
//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;
希望这可以帮助想要做类似事情的人。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句