inno setup bmp图像出现在一个页面上

时间:2012-10-17 16:38:08

标签: inno-setup

我希望bmp图像出现在单个页面“selectadditionaltasks”上,但它出现在所有页面上。我做错了什么?

procedure LogoOnClick(Sender: TObject);
var ResCode: Integer;
begin
end;
procedure LogoWizard();

var
  BtnPanel: TPanel;
  BtnImage: TBitmapImage;
begin
  ExtractTemporaryFile('Logo.bmp')

  BtnPanel:=TPanel.Create(WizardForm)
  with BtnPanel do begin
    Left:=40
    Top:=250
    Width:=455
    Height:=42
    Cursor:=crHand
    OnClick:=@logoOnClick
    Parent:=WizardForm
  end
  BtnImage:=TBitmapImage.Create(WizardForm)
  with BtnImage do begin
    AutoSize:=True;
    Enabled:=False;
    Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\Logo.bmp')
    Parent:=BtnPanel
  end
end;
procedure InitializeWizard();
begin
  LogoWizard();
end;

图片示例

Setup screenshot

1 个答案:

答案 0 :(得分:5)

通过将Parent的{​​{1}}设置为您所说的BtnPanel,您希望该面板成为整个向导表单的直接子项。您必须将WizardForm属性更改为您希望该面板显示的页面。

由于您希望图像显示在选择其他任务向导页面上,我建议的最佳方法是仅使用没有基础面板的图像并调整BtnPanel.Parent检查列表的大小框,默认情况下还会覆盖您要放置图像的页面底部区域。这就是以下脚本。您也可以关注此脚本的commented version

TasksList