Delphi 4st Dbgrid (zellenfarbe)

Computer: Software & Programmierung Programmierung allgemein
#1

Hallo,

ich würde gerne eine Zelle eines dbgrid´s auf eine Abfrage andersfarbig darstellen. Geht sowas?
Beispiel: Ist ein Wert True dann soll die Zelle der Spalte („erledigt“) auf grün wechseln.

Vielen Dank!
Dept

#2

Hallo,

habs nur mal quick n’ dirty eingetippt und nicht getestet, aber das Prinzip sollte erkennbar sein.

viel Glück!

Rüdiger

DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
if Uppercase(Column.Field.FieldName)=Uppercase(‚erledigt‘) then
begin
if Column.Field.AsBoolean=True then
begin
DBGrid1.Canvas.Brush.Color:=clGreen;
DBGrid1.Canvas.Fillrect(Rect);
DBGrid1.Canvas.textout(Rect.Left+2,Rect.Top+2,‚True‘);
end;
end;

#3

das ganze natürlich in OnDrawColumnCell

#4

DANKE! GENAU SO!
das ganze natürlich in OnDrawColumnCell