2016-12-08 3 views

ответ

1

Я не думаю, что это возможно в настройках Inno собственно. Возможно, это клоун Inno Setup.

Проблема в том, что все метки в Inno Setup - TStaticText, что не является прозрачным. Таким образом, вам придется заменить все на TLabel. И их много. И они управляются Inno Setup. Таким образом, вам нужно будет постоянно обновлять новые значения TStaticText до значений, установленных в исходном TLabel установкой Inno. Возможно, это даже не возможно.


Так что на самом деле вы можете создать страницу, как в своем вопросе. Но только потому, что нет стандартных ярлыков Inno Setup. Но вы не можете скрыть их всех.

Installer with background image

procedure InitializeWizard(); 
var 
    BackImage: TBitmapImage; 
begin 
    { Hide top panel } 
    WizardForm.MainPanel.Visible := False; 

    { Adjust "select dir" page controls for a stretched inner page size } 
    WizardForm.DirEdit.Left := WizardForm.DirEdit.Left + WizardForm.InnerNotebook.Left; 
    WizardForm.DirEdit.Top := WizardForm.DirEdit.Top + WizardForm.InnerNotebook.Top; 
    WizardForm.DirBrowseButton.Left := 
    WizardForm.DirBrowseButton.Left + WizardForm.InnerNotebook.Left; 
    WizardForm.DirBrowseButton.Top := 
    WizardForm.DirBrowseButton.Top + WizardForm.InnerNotebook.Top; 

    { Hide non-transparent labels }  
    WizardForm.DiskSpaceLabel.Visible := False; 
    WizardForm.SelectDirBrowseLabel.Visible := False; 
    WizardForm.SelectDirLabel.Visible := False; 

    { Stretch the outer page across whole form } 
    WizardForm.OuterNotebook.Width := WizardForm.ClientWidth; 
    WizardForm.OuterNotebook.Height := WizardForm.ClientHeight; 

    { Stretch the inner page across whole outer page } 
    WizardForm.InnerNotebook.Left := 0; 
    WizardForm.InnerNotebook.Top := 0; 
    WizardForm.InnerNotebook.Width := WizardForm.OuterNotebook.ClientWidth; 
    WizardForm.InnerNotebook.Height := WizardForm.OuterNotebook.ClientHeight; 

    { Put buttons on top of the page (image) } 
    WizardForm.BackButton.BringToFront() 
    WizardForm.NextButton.BringToFront(); 
    WizardForm.CancelButton.BringToFront(); 

    { Add a background image }  
    BackImage := TBitmapImage.Create(WizardForm); 
    BackImage.Parent := WizardForm.SelectDirPage; 
    BackImage.Top := 0; 
    BackImage.Left := 0; 
    { ... } 
    BackImage.Bitmap.LoadFromFile(...); 
end; 

Похожие вопросы:

1

Может быть, вы можете попробовать Graphical Installer для установки Inno, который специально разработан для этой цели.

С его помощью вы можете создать прохладно выглядящие монтажник, и они поддерживают изменение фона (это изображение от последнего проекта к игре Shadow Tactics) моды:

Graphical Installer example

Я разработчик этого проекта (коммерческому), так если вам нужна дополнительная информация, не стесняйтесь спрашивать.