Dbgrid

[gerrykla]

Hallo !

Ich bringe es nicht fertig eine Boolesische variable im dbgrid nur für die Anzeige zu verändern.
Klartext aus True False z.b. ok oder offen. habe schon mit dem GridEreigniss ondrawcolumncell herumgebastelt, aber leider ....

Delphi-Quellcode:

                
if dbgrid1.DataSource.DataSet.FieldbyName('STATUS_ok').asString = '0' then
begin
  fillRect(rect);
  dbgrid1.Canvas.Font.height := -14;
  dbgrid1.Canvas.TextRect(Rect, Rect.Left + 3, Rect.Top + 2,'offen');
end 
else
begin
  fillRect(rect);
  dbgrid1.Canvas.Font.height := -14;
  dbgrid1.Canvas.TextRect(Rect, Rect.Left + 3, Rect.Top + 2,'erl.');                            
end;

das funktioniert leider nicht ... sonst müsste ich es in einem stringgrid machen, was andere nachteile hat.