Pintar un dbGRid

[jachguate]

sebas78 comentó:

procedure TFPuma0058.DBGrid1DrawDataCell(Sender: TObject;
  const Rect: TRect; Field: TField; State: TGridDrawState);
begin
  inherited;
  DBItems.Canvas.Brush.color := clred;
  DBItems.Canvas.FillRect(rect);
  DBItems.defaultdrawdatacell(Rect,Field,State);
end;

Puedo estar mal, y me baso en que el editor regularmente mantiene bien la correspondencia de nombres entre objetos/eventos creados para este objeto, aunque no es una regla, pero me parece que estas asignando el color a un objeto diferente del que maneja el evejto.

Para evitar esta posibilidad, y si tenes el evento asociado a varias rejillas, creo que podes valerte del Sender, no?

Hasta luego.