Tabi ki kullanabilirsin panel içinde panel.

Kolay Gelsin

panel içinde panel kullanılabilir mi?

var

 

 Bilgiekrani:TclStyleForm;

 vScroll:TCLVertScrollBox;

 isimbtn:TClProButton;

 bilgiresmi,bilgiresmi1:TclProImage;

 markalabel,modelilabel,Fiyatlabel,Bedenilabel:TclProLabel;

 ProPanel1 : TclProPanel;

 

{

  Bilgiekrani=TclStyleForm.Create(Self);

   vScroll = Bilgiekrani.AddNewVertScrollBox(Bilgiekrani,'ScrollBoxY');

   vScroll.Align = alClient;

  // vScroll.ShowSrollBars = True;

   

 /* ProPanel1=Bilgiekrani.AddNewProPanel(vScroll,'ProPanel1');

  ProPanel1.Align = alClient;

  //ProPanel1.Width = 200;

 // ProPanel1.Height = 280;

  ProPanel1.clProSettings.BorderColor = clAlphaColor.clHexToColor('#979685');

  ProPanel1.clProSettings.RoundHeight = 10;

  ProPanel1.clProSettings.RoundWidth = 10;

  ProPanel1.clProSettings.BorderWidth = 2;

  ProPanel1.clProSettings.IsFill = True; 

  ProPanel1.clProSettings.IsRound = True;

  ProPanel1.SetclProSettings(ProPanel1.clProSettings);*/

  

   isimbtn=Bilgiekrani.AddNewProButton(vScroll,'isimbtn','bilgi')

   isimbtn.Height=200;

   isimbtn.Width=250;

   //isimbtn.Align=alTop;

   //isimbtn.Margins.Top=15;

  // isimbtn.Margins.Left=10;

   //isimbtn.Margins.Right=10;

   isimbtn.Align=alTop;

   //isimbtn.Margins.Bottom=0;

   isimbtn.clProSettings.FontColor = clAlphaColor.clHexToColor('#FFFFFF');

   isimbtn.ClProSettings.BackgroundColor=clAlphaColor.clHexToColor('#979685');

   isimbtn.ClProSettings.RoundWidth=20;

   isimbtn.ClProSettings.RoundHeight=20;

   isimbtn.ClProSettings.BorderColor=clAlphaColor.clHexToColor('#f1e9e9');

   isimbtn.ClProSettings.FontSize=30;

   isimbtn.ClProSettings.borderWidth=2;

   isimbtn.SetClProSettings(isimbtn.ClProSettings);

   Bilgiekrani.AddNewEvent(isimbtn,tbeOnClick,'');

   

  bilgiresmi = Bilgiekrani.AddNewProImage(vScroll,'bilgiresmi');

  bilgiresmi.Margins.Top=10;

  //bilgiresmi.Margins.Bottom=200;

 // bilgiresmi.Width = 350;

  bilgiresmi.Height = 450;

  bilgiresmi.Align=alTop;

  bilgiresmi.clProSettings.BorderColor = clAlphaColor.clHexToColor('#6f35b6');

  bilgiresmi.clProSettings.FontColor = clAlphaColor.clDarkorchid;

  bilgiresmi.clProSettings.RoundHeight = 10;

  bilgiresmi.clProSettings.RoundWidth = 10;

  bilgiresmi.clProSettings.BorderWidth = 2;

  bilgiresmi.clProSettings.IsFill = True; 

  bilgiresmi.clProSettings.IsRound = True;

  bilgiresmi.clProSettings.PictureSource = 'https://r.resimlink.com/gy8IVpFt0d.png';

  bilgiresmi.clProSettings.PictureAutoFit = True;

  bilgiresmi.SetclProSettings(bilgiresmi.clProSettings);

  

  markalabel = Bilgiekrani.AddNewProLabel(vScroll,'markalabel','Markası'+' '+'Nike');

  markalabel.Width = 250;

  markalabel.Height = 30;

  markalabel.Align=alTop;

  //markalabel.Margins.Bottom=50;

 // markalabel.Margins.Top=340;

  markalabel.clProSettings.FontColor = clAlphaColor.clHexToColor('#000000');

  markalabel.clProSettings.FontSize = 20;

  markalabel.clProSettings.FontVertAlign = palcenter;

  markalabel.clProSettings.FontHorzAlign = palLeading;

  markalabel.clProSettings.TextSettings.Font.Style = [fsBold];

  markalabel.clProSettings.IsFill = True; 

  markalabel.clProSettings.IsRound = True;

  markalabel.SetclProSettings(markalabel.clProSettings);

  

    bilgiresmi1 = Bilgiekrani.AddNewProImage(vScroll,'bilgiresmi1');

  bilgiresmi1.Margins.Top=10;

  //bilgiresmi.Margins.Bottom=200;

 // bilgiresmi.Width = 350;

  bilgiresmi1.Height = 450;

  bilgiresmi1.Align=alTop;

  bilgiresmi1.clProSettings.BorderColor = clAlphaColor.clHexToColor('#6f35b6');

  bilgiresmi1.clProSettings.FontColor = clAlphaColor.clDarkorchid;

  bilgiresmi1.clProSettings.RoundHeight = 10;

  bilgiresmi1.clProSettings.RoundWidth = 10;

  bilgiresmi1.clProSettings.BorderWidth = 2;

  bilgiresmi1.clProSettings.IsFill = True; 

  bilgiresmi1.clProSettings.IsRound = True;

  bilgiresmi1.clProSettings.PictureSource = 'https://r.resimlink.com/gy8IVpFt0d.png';

  bilgiresmi1.clProSettings.PictureAutoFit = True;

  bilgiresmi1.SetclProSettings(bilgiresmi.clProSettings);

  Bilgiekrani.Run;

}