Inno Setup中的全屏背景图像
答
不要那样做。这违反了Windows设计准则。
无论如何,如果你要使用WindowVisible=yes
directive使传统的全屏模式,安装程序,然后通过TMainForm
型MainForm
全局变量修改(现在可见的)背景窗口。
[Setup]
WindowVisible=yes
[Files]
Source: "back.bmp"; Flags: dontcopy
[Code]
procedure InitializeWizard();
var
BackgroundImage: TBitmapImage;
begin
BackgroundImage := TBitmapImage.Create(MainForm);
BackgroundImage.Parent := MainForm;
BackgroundImage.SetBounds(0, 0, MainForm.ClientWidth, MainForm.ClientHeight);
BackgroundImage.Stretch := True;
ExtractTemporaryFile('back.bmp');
BackgroundImage.Bitmap.LoadFromFile(ExpandConstant('{tmp}\back.bmp'));
end;
对于一个稍微不同的实现,请参阅Background image during the installation在ISXKB。
我的回答有帮助吗? –