AnaForm:TclForm; 

 { 

 AnaForm=TclForm.Create(Self);

 ShowMessage(AnaForm.clHeight);

 ShowMessage(AnaForm.clWidth);

 AnaForm.Run; 

 }
Kullanıyoruz. 
Gelen mesaja göre pixel ataması yapıyoruz. 
Eğer projenin her platform da aynı şekil de gözükmesini de istiyorsan;
https://www.docs.clomosy.com/Responsive_Designing " rel="nofollow - https://www.docs.clomosy.com/Responsive_Designing  ;
Kullanabilirsin. 

void Test_TCLGridLayoutV

var

   GridLayout: TCLGridLayout;

   TestBtn: TClProButton;

   TestIconImg: TClProImage;

   TestLbl: TClProLabel;

   

   I:integer;

{

    GridLayout = MainForm.AddNewGridLayout(MainMenuPnl,'GridLayout');

    GridLayout.Align = alClient;

    GridLayout.ItemHeight = (MainMenuPnl.Height*30)/100;

    GridLayout.ItemWidth = (MainMenuPnl.Width*50)/100;

    

    

    for (I = 1 to 6) {

      TestBtn = MainForm.AddNewProButton(GridLayout,'TestBtn'+IntToStr(I),'');

      TestBtn.Align = alLeft;

      SetObjectMargins(TestBtn,10);

      TestBtn.clProSettings.PictureSource = ' https://clomosy.com/learn/clomosy.png" rel="nofollow - https://clomosy.com/learn/clomosy.png ';

      TestBtn.SetclProSettings(TestBtn.clProSettings);

      MainForm.AddNewEvent(TestBtn,tbeOnClick,'BtnOnClick');

      

      /*TestIconImg = MainForm.AddNewProImage(TestBtn,'TablesIconImg'+IntToStr(I));

      TestIconImg.Align = alTop;

      TestIconImg.Width = 76;

      TestIconImg.Height = 76;

      TestIconImg.Margins.Top = 20;

      TestIconImg.clProSettings.PictureSource = ' https://resmim.net/cdn/2025/10/22/jV6v6Q.png" rel="nofollow - https://resmim.net/cdn/2025/10/22/jV6v6Q.png ';

      TestIconImg.clProSettings.PictureAutoFit = True;

      TestIconImg.SetclProSettings(TestIconImg.clProSettings);

      MainForm.AddNewEvent(TestIconImg,tbeOnClick,'BtnOnClick');*/

      

      TestLbl = MainForm.AddNewProLabel(TestBtn,'TablesLbl'+IntToStr(I),'MASALAR');

      TestLbl.Align = alBottom;

      TestLbl.Width = 155;

      TestLbl.Height = 30;

      TestLbl.Margins.Bottom = 15;

      TestLbl.clProSettings.FontSize = 25;

      TestLbl.clProSettings.FontVertAlign = palcenter;

      TestLbl.clProSettings.FontHorzAlign = palcenter;

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

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

      TestLbl.SetclProSettings(TestLbl.clProSettings);

      MainForm.AddNewEvent(TestLbl,tbeOnClick,'BtnOnClick');

    }

}

Merhaba Eren, 
Butona Image eklemek istediğin de hangi özelliklerinin olmasını istiyorsun?
PictureSource kullanıldığın da (aşağıda örneğini bıraktım) butonda görsel varken tıklama efekti geliyor. 
TCLGridLayout; içersine eklenen bileşenlerin boyut ayarlanması içinde daha detaylı dönüş yapacağım 

var

   GridLayout: TCLGridLayout;

   TestBtn: TClProButton;

   TestIconImg: TClProImage;

   TestLbl: TClProLabel;

   MainForm: TclForm;

   I:integer;

   void onclick;

   {

     ShowMessage('Clomosy'); 

     }

   

{

    MainForm=TclForm.Create(self);

    GridLayout = MainForm.AddNewGridLayout(MainForm,'GridLayout');

    GridLayout.Align = alClient;

    GridLayout.ItemHeight = (MainForm.clHeight*30)/100;

    GridLayout.ItemWidth = (MainForm.clWidth*50)/100;

    

    

    for (I = 1 to 6) {

      TestBtn = MainForm.AddNewProButton(GridLayout,'TestBtn'+IntToStr(I),'');

      TestBtn.Align = alLeft;

      TestBtn.clProSettings.PictureSource = ' https://clomosy.com/learn/clomosy.png" rel="nofollow - https://clomosy.com/learn/clomosy.png ';

      TestBtn.SetclProSettings(TestBtn.clProSettings);

      MainForm.AddNewEvent(TestBtn,tbeOnClick,'onclick');

      }

    MainForm.Run;

}