MainPanel
用图像覆盖并隐藏其所有其他组件(WizardSmallBitmapImage
,PageDescriptionLabel
和PageNameLabel
):
[Files]
Source: "rainbow.bmp"; Flags: dontcopy
[Code]
procedure InitializeWizard();
var
BitmapImage: TBitmapImage;
begin
ExtractTemporaryFile('rainbow.bmp');
BitmapImage := TBitmapImage.Create(WizardForm);
BitmapImage.Parent := WizardForm.MainPanel;
BitmapImage.Width := WizardForm.MainPanel.Width;
BitmapImage.Height := WizardForm.MainPanel.Height;
BitmapImage.Stretch := True;
BitmapImage.AutoSize := False;
BitmapImage.Bitmap.LoadFromFile(ExpandConstant('{tmp}\rainbow.bmp'));
WizardForm.WizardSmallBitmapImage.Visible := False;
WizardForm.PageDescriptionLabel.Visible := False;
WizardForm.PageNameLabel.Visible := False;
end;
Run Code Online (Sandbox Code Playgroud)
另请参见如何隐藏主面板并在整个页面上显示图像?
和Inno设置 - 页面名称和描述标签中文本下的透明度.
归档时间: |
|
查看次数: |
1061 次 |
最近记录: |