View Single Post
  #11  
Old 22-07-2013, 09:27
buttignol's Avatar
buttignol buttignol is offline
Registered User
 
Join Date: Sep 2012
Location: Brasil
Posts: 126
Thanks: 102
Thanked 16 Times in 13 Posts
buttignol is on a distinguished road
Friends need a help how to make transparent TasksList
as of the SelectTasksLabel
I'm using this script without success

Code:
var
  SelectTasksLabel,TasksList: TLabel;
procedure InitializeWizard();
begin
   WizardForm.SelectTasksLabel.Hide;
   WizardForm.TasksList.Hide;

   SelectTasksLabel:=TLabel.Create(WizardForm);
   SelectTasksLabel.Left:=60;
   SelectTasksLabel.Top:=15;
   SelectTasksLabel.Width:=470;
   SelectTasksLabel.Height:=35;
   SelectTasksLabel.AutoSize:=False;
   SelectTasksLabel.WordWrap:=True;
   SelectTasksLabel.Transparent:=True;
   SelectTasksLabel.Font.Size := 10;
   SelectTasksLabel.Caption:=WizardForm.SelectTasksLabel.Caption;
   SelectTasksLabel.Parent:=WizardForm.SelectTasksPage;

   TasksList:=TLabel.Create(WizardForm);
   TasksList.Left:=60;
   TasksList.Top:=70;
   TasksList.Width:=400;
   TasksList.Height:=252;
   TasksList.AutoSize:=False;
   TasksList.Font.Size := 10;
   TasksList.Parent:= WizardForm.SelectTasksPage;
end;
Attached Images
File Type: jpg Exemplo.jpg (160.9 KB, 140 views)

Last edited by buttignol; 22-07-2013 at 09:32.
Reply With Quote