1

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

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不起作用的文件。

4

2 回答 2

4

该WizardSmallImageFile指令映射到 的WizardSmallBitmapImage控件WizardForm，因此在代码中您可以通过这种方式访问​​它（无论如何，不​​要硬编码页面 ID 号，而是使用预期的PageID常量）：

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;
于 2013-05-26T15:05:57.053 回答
0

TLama 再一次找到了答案，只需要继续谷歌搜索。对于那些试图做类似的事情并且在寻找答案时遇到问题的人，请查看基于 Inno Setup 中的可选组件的跳过自定义页面

于 2013-05-26T18:42:26.360 回答