经常使用Inno Setup打包安装程序的都知道,在默认状态下我们可以通过在 [Setup] 段增加授权许可协议,而在默认情况下许可协议是需要用户在阅读完成后自己选择同意或者拒绝的。有时候我们想直接不需要用户选择在默认情况下就直接选择我同意,这样用户就可以直接点击下一步进行安装。而我们可以通过以下代码实现Inno Setup 在默认许可协议界面自动勾选我同意许可。
复制以下代码保存到 Inno Setup 脚本中即可:
[code]
procedure InitializeWizard();
begin
WizardForm.LICENSEACCEPTEDRADIO.checked:= true;
end;
[Setup]
AppName=我同意许可协议
AppVersion=1.0
AppPublisher=城东书院
AppPublisherURL=https://www.cdsy.xyz
AppSupportURL=https://www.cdsy.xyz
AppUpdatesURL=https://www.cdsy.xyz
Compression=lzma2
DisableDirPage=auto
DisableProgramGroupPage=auto
LicenseFile=embedded\License.txt
Inno Setup在自定义 DIY 功能上非常灵活,如果您有 Delphi 编程经验,那么写这些脚本并对 Inno Setup 安装包做扩展非常容易。