Kolorowanie czcionki w komórce dbgrid

0

Witam!
Mam taki kod:

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
  Field: TField; State: TGridDrawState);
begin
 if Table1.FieldByName('punkty').AsInteger = 20  then
    DBGrid1.Canvas.Font.Color := clRed;
  DBGrid1.DefaultDrawDataCell(Rect, Field, State);
end;

Dlaczego mi to nie chce kolororwać pomimo że kod jest dobry? Po skompilowaniu nic się nie dzieje. Czcionka w komórce z wartością 20 nie zmienia koloru.

Czy trzeba jeszcze jakoś to inaczej uruchomić lub coś ustawić w Properties tabeli?
Dzięki za wskazówki. [browar]

0

Zmieniałeś jakieś właściwości

DBGrida

?

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0