Huhu,
Ich habe eine kleine Terminverwaltung geschrieben, wo ich mit die einzelnen Tage in einer DBgrid anzeigen lasse.
Besteht die möglichkeit in der Grid einzelne Zeilen farblich zu verändern?
Ich habe es bis jetzt nur hinbekommen, das mir die schrift Bunt wird aber nicht der Huntergrund dieser Zelle.
Delphi-Quellcode:
procedure Grid_DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState;FLDname : String);
begin
if (Column.FieldName = FLDname) and (State=[]) then TDBGrid(Sender).Canvas.Font.Color := CLRED;
TDBGrid(Sender).DefaultDrawColumnCell(Rect,Datacol,Column,State);
end;
Über "TDBGrid(Sender).Canvas.Font.Color := CLRED;" kann ich ja die Schrift rot machen aber wie mache ich die ganze Zeile rot?
PS. Ich nutze
BDS 2006
Danke schonmal im Vorraus
mfg Jens