Friends I am trying to put a warning on the page selecttasks page but I can not see the prompt script ex what is wrong
Code:
var
avisoLabel: TLabel;
procedure InitializeWizard();
var
aviso: TLabel;
begin
avisoLabel := TLabel.Create(WizardForm);
avisoLabel.Left := ScaleX(0);
avisoLabel.Top := ScaleY(190)
avisoLabel.Width := ScaleY(185)
avisoLabel.Height := ScaleY(13)
//avisoLabel.Parent := WizardForm;
avisoLabel.Parent:= WizardForm.SelectDirPage;
//avisoLabel.Font.Name:='Verdana';
//avisoLabel.Font.Size:= 8;
//avisoLabel.Font.Color:=${#Color};
avisoLabel.Transparent:=true;
avisoLabel.Caption := 'ex;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx';
//avisoLabel.Font.Style:= [fsBold];
//avisoLabel.AutoSize := True;
end;
procedure CurPageChanged(CurPageID: Integer);
begin
avisoLabel.Visible := CurPageID = wpSelectDir; //selecionar pagina de destino
end;