Question

是否可以根据向导表单更改向导表单上的顶部图像。我可以更改左侧图像，但想要更改顶部（小图像）。

procedure CurPageChanged(CurPageID: Integer);
begin
  if CurPageID = 4 then
   filename:= 'babylontoolbar.bmp'
  else
   filename:= 'label2-crop.bmp';
  ExtractTemporaryFile(filename); 
  (*WizardForm.WizardSmallImageFile.Bitmap.LoadFromFile(ExpandConstant('{tmp}\'+FileName));*)

  WizardForm.WizardBitmapImage.Bitmap.LoadFromFile(ExpandConstant('{tmp}\' + FileName));
end;

我只想知道如何引用小文件来替换不起作用的WizardSmallImageFile。

Answer 1

WizardSmallImageFile指令映射到WizardForm的{{3}}控件，所以在代码中你可以这样访问它（无论如何，不要硬编码页面ID号，而是使用预期的WizardSmallBitmapImage常数）：

procedure CurPageChanged(CurPageID: Integer);
var
  FileName: string;
begin
  if CurPageID = wpInfoBefore then
    FileName := 'babylontoolbar.bmp'
  else
    FileName := 'label2-crop.bmp';

  ExtractTemporaryFile(FileName);
  WizardForm.WizardSmallBitmapImage.Bitmap.LoadFromFile(ExpandConstant('{tmp}\' + FileName));
end;

Answer 2

TLama再次得到了答案，只需继续谷歌搜索。对于那些试图做与此类似的事情并且在找到答案时遇到问题的人，请查看Skipping custom pages based on optional components in Inno Setup

以编程方式更改WizardSmallImageFile - Inno Setup

2 个答案: