PageNameLabel:=TLabel.Create(WizardForm); with PageNameLabel do begin AutoSize:= False; SetBounds(ScaleX(70), ScaleY(185), ScaleX(400), ScaleY(30)); Transparent:=True; Font.Name:= 'Georgia'; Font.Size:= 13; Font.Color:=$FFFFFF; Font.Style:=[fsBold]; Parent:=WizardForm; end; PageDescriptionLabel:=TLabel.Create(WizardForm); with PageDescriptionLabel do begin AutoSize:= False; SetBounds(ScaleX(100), ScaleY(215), ScaleX(600), ScaleY(50)); Wordwrap:= True; Transparent:=True; Font.Name:= 'Georgia'; Font.Size:= 10; Font.Color:=$FFFFFF; Font.Style:=[fsBold, fsItalic]; Parent:=WizardForm; end; |