Inno Setup 自定义界面心得

因为项目需要,需要打 windows 安装包,要求安装界面完全按照需求来。作为没接触过这块儿的服务端宝宝,在此期间踩了很多坑。

坑不提也罢,最终结果圆满,记录下与大部分网上PO出来的做法不太一样的小心得,备忘。

网上搜到的自定义界面,都用的 botva2.dll ,我没用。应该说,用过,但遇到了图片变形的问题,短时间内没解决,所以最后全都用的 Inno Setup 原生类。Inno Setup 官方文档很详细,而且开源,所以原生用起来还是很顺利的。此前没接触过 Pascal 语言,但影响不大。

加载透明图片或按钮

网上多用 botva2.dll 来加载 png 图片,以达到圆角效果。由于遇到图片变形,我开始在官方文档里找替代方案。

Inno Setup 本身提供一个类 TBitmapImage 来支持带 alpha 通道的bmp 图片,也就是 32 位的 bmp 图片,支持透明效果。PhotoShop 中可通过添加 alpha 通道来生成 32 位 bmp 图。

显示图片方法:

val BmpImg : TBitmapImage;

BmpImg := TBitmapImage.Create(WizardForm); // 卸载时将 WizardForm 换为 UninstallProgressForm 即可
with BmpImg do
begin
    Parent := WizardForm;                  // 卸载时将 WizardForm 换为 UninstallProgressForm 即可
    Bitmap := TAlphaBitmap.Create;  
    Bitmap.AlphaFormat := afDefined;       // 须设置此值,才能读取图片的 alpha 通道,应在加载图片文件前设置
    Bitmap.LoadFro
  • 1
    点赞
  • 5
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
InnoSetup是一个开放源代码的安装程序制作工具,它提供了自定义安装界面的功能,可以方便地在安装过程中添加文本框等控件。以下是如何使用InnoSetup制作带有文本框的自定义界面的简要步骤: 1. 在InnoSetup的脚本文件中声明变量,用于存储用户在文本框中输入的内容。例如: ``` [Code] var MyTextBox: TNewEdit; function InitializeSetup(): Boolean; begin MyTextBox := TNewEdit.Create(WizardForm); MyTextBox.Parent := WizardForm; MyTextBox.Left := 100; MyTextBox.Top := 100; MyTextBox.Width := ScaleX(200); MyTextBox.Text := '请输入您的名字'; Result := True; end; function NextButtonClick(CurPageID: Integer): Boolean; begin if CurPageID = wpWelcome then begin MsgBox('您好,' + MyTextBox.Text + '!', mbInformation, MB_OK); end; Result := True; end; ``` 在上述代码中,通过使用TNewEdit控件创建一个文本框,并在InitializeSetup()函数中将其添加到安装向导中。在NextButtonClick()函数中,当用户点击“下一步”按钮时,会弹出一个消息框,显示用户在文本框中输入的内容。 2. 根据需要,可以对文本框进行进一步格式设置,例如设置文本框的字体、背景色等属性,以及添加输入限制等功能。例如: ``` MyTextBox.Color := clYellow; MyTextBox.Font.Style := [fsBold]; MyTextBox.MaxLength := 10; MyTextBox.CharCase := ecUpperCase; ``` 在上述代码中,通过设置MyTextBox的Color属性和Font.Style属性,使文本框的外观更加美观。通过设置MaxLength属性,可以限制用户在文本框中输入的字符个数;通过设置CharCase属性,可以将用户在文本框中输入的字符自动转换为大写字母。 3. 最后,可以将自定义界面整合到安装程序的完整过程中。在InnoSetup的脚本文件中,可以将各个自定义页面添加到页面序列中,并在各自定义页面中添加相应的控件。例如: ``` [Code] procedure InitializeWizard(); begin WizardForm.WizardPages.Add(CreateInputPage(wpWelcome, '欢迎使用InnoSetup', '请输入您的名字:')); end; function NextButtonClick(CurPageID: Integer): Boolean; begin case CurPageID of wpWelcome: begin if MyTextBox.Text = '' then begin MsgBox('请输入您的名字!', mbError, MB_OK); Result := False; Exit; end; end; end; Result := True; end; ``` 在上述代码中,通过使用CreateInputPage()函数创建一个自定义页面,并在其中添加一个文本框。在NextButtonClick()函数中,可以对用户在文本框中输入的内容进行检查,确保用户输入了有效的内容。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值