在很多对程序打包的时候你能看到有很多是基于 Inno Setup 软件进行打包的安装包,因为 Inno Setup 是一款开源免费的安装包制作工具。使用 Inno Setup 打包的软件在默认向导界面中如果我们直接点击右上角的关闭,软件会直接提示我们是否要退出。有时候我觉得这个太麻烦,想直接让 Inno Setup 点击退出不弹出提示窗口,这个时候您就可以参考大眼仔旭给大家整理分享出来的代码即可实现效果。
这里给大家提供了两种代码解决方案都可以让 Inno Setup 安装包在退出时不提示询问窗口,您可以选择适合自己的使用即可。
第一种:Inno Setup 点击退出不弹出提示窗口解决方案
1
2
3
4
5
6
7
8
9
10
11 [Code]
procedure CloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := true;
PostMessage(WizardForm.Handle, 18, 0, 0);
end;
procedure InitializeWizard();
begin
WizardForm.OnCloseQuery:= @CloseQuery;
end;
第二种:Inno Setup 点击退出不弹出提示窗口解决方案
1
2
3
4
5 [Code]
procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
Confirm := False;
end;
以上的代码大眼仔旭都测试通过,Inno Setup 网络中也有很多脚本代码可以参考,大家在对代码进行整合使用的时候请灵活使用。学会好 Inno Setup 您以后想制作漂亮个性的安装包非常方便。
原创文章,作者:kirin,如若转载,请注明出处:https://blog.ytso.com/214399.html