void setUpGrid

{ 

  try

    cariGrid.BeginUpdate

    

    cariGrid.Align = alClient;

    cariGrid.Height = 240;

    

    cariGrid.FixedLayoutFillColor = clAlphaColor.clHexToColor(libColors.colorListBg); //Başlık Arkaplan Rengi

    cariGrid.FixedLayoutFontColor = clAlphaColor.clHexToColor(libColors.textColor); //Başlık Yazı Rengi

    

    cariGrid.FocusedLayoutFillColor = clAlphaColor.clHexToColor(libColors.colorStroke2); //Seçilen Hücre Arkaplan Rengi

    cariGrid.FocusedLayoutFontColor = clAlphaColor.clHexToColor(libColors.textColor); //Seçilen Hücre Yazı Rengi

    

    cariGrid.SelectedLayoutFillColor = clAlphaColor.clHexToColor(libColors.colorStroke2); //Seçilen Satır Arkaplan Rengi

    cariGrid.SelectedLayoutFontColor = clAlphaColor.clHexToColor(libColors.textColor); //Seçilen Satır Yazı Rengi

    

    cariGrid.Options.Selection.Mode = smSingleRow;//smSingleRow VEYA smSingleColumn VEYA smNone

    cariGrid.AutoSizeColumns(true, 50);// Kolon genişliği ayarlama

    

    for(i = 0 to cariGrid.RowCount)

    {

      for(j = 0 to cariGrid.ColumnCount)

      {

        if(i mod 2 == 1)

        {

          cariGrid.Colors[j, i] = clAlphaColor.clHexToColor(libColors.colorBackground);

        }

        else

        {

          cariGrid.Colors[j,i] = clAlphaColor.clHexToColor(libColors.colorListBg);

        }

        cariGrid.FontColors[j,i] = clAlphaColor.clHexToColor(libColors.textColor);

        cariGrid.FontStyles[j,i] = 1;

      }

    }

    

    cariGrid.EndUpdate;

  except

  ShowMessage('HEEYY!!');

  }

}

void addDataToGrid

{

  try

    libServerConnection.sqlQuery.SQL.Text = 'SELECT * FROM ERP_Cari';

    libServerConnection.sqlQuery.Open;

    

    if(libServerConnection.sqlQuery.Found)

    {

     cariGrid = cariList.AddNewProGrid(cariList,'cariGrid');

     

     cariGrid.ConnectDataSet(libServerConnection.sqlQuery);

     cariGrid.Options.Selection.Mode = smSingleRow;

     setUpGrid;

    }

  except

  ShowMessage('Veri Eklenemedi.');

  }

}