下午好,我正在开发安装程序的一部分,我想在wpInstalling部分插入带有链接的图像,但我无法做到,我知道如何插入文本,但我不知道如何插入文本知道如何做我之前说过的话。我希望你能帮助我。
提前致谢。
答案 0 :(得分:2)
感谢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;
答案 1 :(得分:0)
您可以在此项目中找到更多信息(由日本dvp制作)。他在InnoSetup中创建了一个Web控件。