30-04-2022, Saat: 10:09
Arkadaşlar , Ben bu şekilde bir kod ile çözmeye uğraştım bir türlü renklendirme yapamadım yardım eder misiniz?
Aktarılmışları ve aktarılmamışları ayrı renk yapmak istedim.
Aktarılmışları ve aktarılmamışları ayrı renk yapmak istedim.
procedure TForm29.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if FaturaListe.FieldByName('DURUM').AsString='Aktarılmamış' then
Begin
DBGrid1.Columns[6].Color:=clYellow;
end
Else if FaturaListe.FieldByName('DURUM').AsString='Aktarılmış' then
Begin
DBGrid1.Columns[6].Color:=clBlue;
end;
end;
end.

