InnoSetup: вставьте картинку со ссылкой

Question

Добрый день, я работаю над разделом установщика, где я хочу вставить изображение со ссылкой в ​​раздел wpInstalling, но мне это не удается, я знаю, как для вставки текста, но я не знаю, как сделать то, что я сказал раньше. Я надеюсь, что вы можете мне помочь.

Спасибо заранее.

Answer 1

Дополнительную информацию можно получить в этом проекте (сделанном японским dvp). Он создает веб-элемент управления в InnoSetup.

• Блог здесь: Innosetup webctrl v2.1
• Скачать здесь: inno_webctrl_v2.1.zip

Answer 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;