function TitleLabelCreate(AForm: TCLForm; AParent: TCLScaledLayout; ATitle: String): TCLProLabel;

var

  MyLabel: TCLProLabel; 

{

  MyLabel = AForm.AddNewProLabel(AParent, 'userTitleLbl', ATitle);

  MyLabel.Align = alTop;

  MyLabel.Height = 150;

  MyLabel.Margins.Top = -100;

  MyLabel.clProSettings.FontSize = 30;

  MyLabel.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#668F6B');

  MyLabel.clProSettings.FontColor = clAlphaColor.clHexToColor('#ffffff');

  MyLabel.clProSettings.FontVertAlign = palTrailing; 

  MyLabel.clProSettings.FontHorzAlign = palCenter;

  MyLabel.SetclProSettings(MyLabel.clProSettings);

  Result = MyLabel; 

}  

  mainForm = TCLForm.Create(Self);

  mainForm.BtnGoBack.Visible = True;

  mainForm.BtnFormMenu.Visible = False;

  mainForm.FormWaiting.Visible = False;

  uLib.TitleLabelCreate(mainForm,scaledLyt,'Konu Başlığı');