2016-07-31 5 views

Antwort

1

decken den MainPanel mit einem Bild und blenden alle seine anderen Komponenten (WizardSmallBitmapImage, PageDescriptionLabel und PageNameLabel):

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

[Code] 

procedure InitializeWizard(); 
var 
    BitmapImage: TBitmapImage; 
begin 
    ExtractTemporaryFile('rainbow.bmp'); 
    BitmapImage := TBitmapImage.Create(WizardForm); 
    BitmapImage.Parent := WizardForm.MainPanel; 
    BitmapImage.Width := WizardForm.MainPanel.Width; 
    BitmapImage.Height := WizardForm.MainPanel.Height; 
    BitmapImage.Stretch := True; 
    BitmapImage.AutoSize := False; 
    BitmapImage.Bitmap.LoadFromFile(ExpandConstant('{tmp}\rainbow.bmp')); 

    WizardForm.WizardSmallBitmapImage.Visible := False; 
    WizardForm.PageDescriptionLabel.Visible := False; 
    WizardForm.PageNameLabel.Visible := False; 
end; 

Rainbow Wizard


Siehe auch How to hide the main panel and show an image over the whole page?
und Inno Setup - Transparency under text in page name and description labels.

+0

vielen Dank –

+0

Siehe [Was soll ich tun, wenn jemand meine Frage beantwortet?] (Http://stackoverflow.com/help/someone-answers) –

+0

Haben Sie den obigen Link gelesen? –

Verwandte Themen