[loki33]

Схожу с ума... Пытаюсь в DBGrid-е окрасить строки в которых поле ost меньше нуля...

Код:

procedure TForm1.G_tovDrawDataCell(Sender: TObject; const Rect: TRect;
  Field: TField; State: TGridDrawState);
begin
    if  d.Tovar.FieldByName('ost').AsFloat < 0 then
        G_tov.Canvas.font.Color := clRed;
    G_tov.DefaultDrawDataCell(Rect, Field, State);
end;

Admin: Пользуемся тегами!

все просто... все соответствует exampl-ам... и НЕ РАБОТАЕТ

Кто знает что за глюк? И как с ним бороться?