[AGAG4]

Dentro del evento gridDrawColumnCell Prueba Esto G.A.R.S.

Código Delphi [-]
if Condicion then begin
//Elegir Color
grid.Canvas.Brush.Color := clRed;
//Pintar CELDA Seleccionada
TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

Saludos....