Kod: Tümünü seç
procedure TFrm_GunlukUyeler.Grid_GunlukUyeDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
If Column.Title.Caption='Adı Soyadı' Then
Begin
If DM.Qry_UyeBilgileri.Locate('UYE_NO',DM.Qry_GunlukUyeUYE_NO.AsString,[])=True Then
Grid_GunlukUye.Canvas.TextRect(Rect, Rect.Left + 2, Rect.Top + 2, DM.Qry_UyeBilgileriADSOYAD.AsString);
End;
end;
bu konuda yardımlarınız bekliyorum..