Var   

  Form1:TclForm;

  ProBtn : TClProButton;

void BtnOnClick;

{

Clomosy.RunUnit('uyeni');

}

{

  Form1 = TclForm.Create(Self);

  

  ProBtn = Form1.AddNewProButton(Form1,'ProBtn','');

  ProBtn.Align = alCenter;

  ProBtn.Width = 250;

  ProBtn.Height = 150;

  //ProBtn.clProSettings.FontColor = clAlphaColor.clhextoColor ('#198fc2');

 // ProBtn.clProSettings.backgroundcolor = clAlphaColor.clhextoColor ('#d0b9df');

  ProBtn.clProSettings.bordercolor = clAlphaColor.clhextoColor ('#000000');

  

 // ProBtn.clProSettings.FontSize = 12;

  ProBtn.clProSettings.borderwidth = 3;

  //ProBtn.clProSettings.roundwidth = 35;

  //ProBtn.clProSettings.roundheight = 30;

  ProBtn.clProSettings.FontVertAlign = palcenter;//palLeading , palCenter , palTrailing

  ProBtn.clProSettings.FontHorzAlign = palCenter;

  //ProBtn.clProSettings.TextSettings.Font.Style = [fsBold];

  ProBtn.clProSettings.PictureSource = '/assets/giris';

  ProBtn.SetclProSettings(ProBtn.clProSettings);

  

  Form1.Run;

}