InnoSetup：插入带有链接的图像

Question

下午好，我正在开发安装程序的一部分，我想在wpInstalling部分插入带有链接的图像，但我无法做到，我知道如何插入文本，但我不知道如何插入文本知道如何做我之前说过的话。我希望你能帮助我。

提前致谢。

Answer 1

感谢v20100v的回复，但我找到了一个简单的方法。在这里，我留下代码以防万一有人需要它。

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program

[Files]
Source: "Logo.bmp"; Flags: dontcopy

[Code]
procedure MyImageClick(Sender: TObject);
var
  ErrorCode: Integer;
begin
  ShellExec('open', 'http://www.google.es', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
end;

procedure CreateMyImage();
begin
  ExtractTemporaryFile('Logo.bmp');
  with TBitmapImage.Create(WizardForm) do
  begin
    Parent := WizardForm.InstallingPage;
    Bitmap.LoadFromFile(ExpandConstant('{tmp}\Logo.bmp'));
    AutoSize := True;
    Left := 0;
    Top := WizardForm.InstallingPage.Top + WizardForm.InstallingPage.Height - Height - 8;
    Cursor := crHand;
    OnClick := @MyImageClick;
  end;
end;

procedure InitializeWizard;
begin
  CreateMyImage();
end;

Answer 2

您可以在此项目中找到更多信息（由日本dvp制作）。他在InnoSetup中创建了一个Web控件。

• 博客：Innosetup webctrl v2.1
• 在此处下载：inno_webctrl_v2.1.zip