DBGrid-Kolorawanie rekordów

Czy ktoś wie jak znienić barwe wybranych rekordów w bazie-tabeli wyświetlanej w DBGrid?

Ja to robię w OnDrawColumnCell

procedure TPanSystem.KontraktyGDDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if DaneBaza.KontraktyQ.FieldByName('Status').AsInteger > 1 then begin
KontraktyGD.Canvas.Brush.Color:=clYellow;
end;
KontraktyGD.DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

poszukaj na forum napewo bylo bo sam pisałem

Słowo 'Status' oznacza nazwę pola - metoda FieldByName() zwraca obiekt reprezentujący pole w tabeli na podstawie jego nazwy.

Powinieneś odwołać sie do wartości w danej komórce grida a nie do bazy dodaj sobie pola jakie przychoidzą z bazy, a następnie porownaj wyniki