DBGrid

[Hans-Peter Bongers]

Hallo Delphianer,

ich möchte in einem DBGrid eine oder auch mehrere Zeilen farbig
hinterlegen. Mit der Delphi-version 5.0 kann man nicht mehr auf
OnDrawDataCell zugreifen. Wie solls und kann ich den sonst einzelene
Datenzeilen mit einer Hintergrundfarbe versehen?

Vielen dank im voraus
Hans-Peter

[Frank Kneffel]

Die Delphi Hilfe sagt dazu, daß OnDrawDataCell veralter ist und statdessen OnDrawColumnCell benutzt werden soll.<br>
Das ganze könnte dann so aussehen:<br>
<pre>
if datacol=1 then //Ist es die fragliche Spalte ?
begin
with tdbgrid(sender) do
begin
if strtointdef(Column.Field.DisplayText,0)>0 then
begin//Bedingung erfüllt
if strtointdef(Column.Field.DisplayText,0)>5 then
Canvas.Brush.Color := clred
else
Canvas.Brush.Color :=clyellow;
end;
Canvas.FillRect(Rect);
DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;
end;
</pre&gt

[Hans-Peter Bongers]

Vielen Dank an alle für die geleistete Hilfe.
Ich habe schon eine Lösung des Problems gefunden.

Hans-Pete