Inno setup 如何在Inno安装程序中的向导窗口左下角添加图像横幅？

如何将图像添加到Inno setup中左下角的安装向导中？

正如@TLama评论的那样：创建一个

TBitmapImage

，将其父级设置为

WizardForm

，将其放置在所需位置并从文件加载图片

[文件]
资料来源：“logo.bmp”；标志：dontcopy
[守则]
过程初始化WizarDaddLogo（）；
变量
图片：TBitmapImage；
开始
Image:=TBitmapImage.Create（WizardForm）；
有图像吗
开始
父项：=向导窗体；
提取临时文件（'logo.bmp'）；
LoadFromFile（ExpandConstant（{tmp}'）+'\logo.bmp'）；
自动调整大小：=真；
自动调整大小：=假；
宽度：=ScaleX（宽度）；
高度：=ScaleY（高度）；
拉伸：=真；
左：=ScaleX（10）；
顶部：=
（WizardForm.ClientHeight+WizardForm.斜面.Top+WizardForm.斜面.Height-高度）
第2组；
结束；
结束；

（代码[具有

事件
属性]用于Inno设置6）

尽管棘手的部分是正确处理屏幕缩放。因此，
AutoSize
技巧和
Scale*
调用

对于不同的比例因子，您甚至可能需要使用不同版本的徽标。

看


正如@TLama评论的那样：创建一个
TBitmapImage
，将其父对象设置为
WizardForm
，将其放置在您想要的位置并从文件加载图片

[文件]
资料来源：“logo.bmp”；标志：dontcopy
[守则]
过程初始化WizarDaddLogo（）；
变量
图片：TBitmapImage；
开始
Image:=TBitmapImage.Create（WizardForm）；
有图像吗
开始
父项：=向导窗体；
提取临时文件（'logo.bmp'）；
LoadFromFile（ExpandConstant（{tmp}'）+'\logo.bmp'）；
自动调整大小：=真；
自动调整大小：=假；
宽度：=ScaleX（宽度）；
高度：=ScaleY（高度）；
拉伸：=真；
左：=ScaleX（10）；
顶部：=
（WizardForm.ClientHeight+WizardForm.斜面.Top+WizardForm.斜面.Height-高度）
第2组；
结束；
结束；

（代码[具有
事件
属性]用于Inno设置6）

尽管棘手的部分是正确处理屏幕缩放。因此，
AutoSize
技巧和
Scale*
调用

对于不同的比例因子，您甚至可能需要使用不同版本的徽标。

看