//Grid Yenileme

void Yenile;

var

  Qry2: TclSqlQuery;

{

    Qry2 = TCLSqlQuery.Create(nil);

    Qry2.Connection = Clomosy.DBSQLServerConnection;

    Qry2.Sql.Text = 'SELECT fis_no, harcama_turu, aciklama, tutar, tarih, saat FROM Harcamalar';

    Qry2.Open;

    

    if (Qry2.Found) 

    {

      clProGrid.connectDataSet(Qry2);

      clProGrid.Align=alClient;

      

      clProGrid.Options.ColumnSize.StretchAll = True;

      clProGrid.Options.Selection.Mode = smSingleRow;

      clProGrid.Options.ColumnSize.Stretch = True;

      

      clProGrid.SelectedLayoutFillColor = clAlphaColor.clHexToColor('#c5ddde');

      clProGrid.FixedLayoutFillColor = clAlphaColor.clHexToColor('#76ABAE');

      clProGrid.FixedLayoutFontColor = clAlphaColor.clHexToColor('#EEEEEE');

      clProGrid.NormalLayoutFillColor = clAlphaColor.clHexToColor('#ffffff');

      clProGrid.FocusedLayoutFillColor = clAlphaColor.clHexToColor('#daeaeb');

    }

}