Inno setup pascal编码下如何美化安装界面支持带边框,圆角,透明阴影窗口

        inno setup自带的安装界面太老套了,如何实现类似网易,微信那种带界面的安装?一般有两种思路:提供一个单独的下载器,然后通过下载器将你用innosetup 打包后的软件下载下来,然后,静默安装这个包;另外一个,就是将自带的安装界面全部隐藏掉,通过在pascal下利用botva2.dll和innocallback.dll两个文件定制安装界面。网上有很多讲述如何制作安装界面的,但很少有例子实现边框和阴影的,下面我说下我实现的方案。

一.窗口支持边框

        要使窗口支持边框,第一种方案就是背景用一张带边框的图片。当然,这种方法能实现,不是我想表达的。另外一种方案:用TPanel 贴图,然后窗口留白,窗口的背景颜色设置为边框设置的颜色。下面是主窗口WizardForm和背景留白控件TPanel的关键代码:

  WIZARDFORM_BORDER_WIDTH 设置为边框的宽度     

    // 初始化主窗口
	with WizardForm do
	begin
		BorderStyle := bsNone;
		Position := poScreenCenter;
		Width := WIZARDFORM_WIDTH_NORMAL;
		Height := WIZARDFORM_HEIGHT_NORMAL;
		Color := $FFc7c7c7;
		NextButton.Height := 0;
		CancelButton.Height := 0;
		BackButton.Visible := FALSE;
	end;
	
	// 初始化主窗口背景
	mainBkPanel := TPanel.Create(WizardForm);
	mainBkPanel.Parent := WizardForm;
	mainBkPanel.ParentBackground := True;
	mainBkPanel.Top := WIZARDFORM_BORDER_WIDTH;
	mainBkPanel.Left := W
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

风亲云叹

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

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

余额充值