Cambiar color de fondo en un DBgrid

[roman]

¿Y has probado lo que te digo? En OnDrawColumnCell tu código pinta de amarillo el fondo cuando UpdateStatus <> usUnmodified. Cuando aplicas o cancelas los cambios, es de suponerse que UpdateStatus sea igual usUnmodified (si no es así tendrás que revisar que valor toma para considerarlo en el condicional) y por tanto no se usará el color amarillo. Pero esto puede no reflejarse de inmediato pues OnDrawColumnCell ocurrirá sólo cuando el DBGrid necesita pintarse. Por ello, al momento de aplicar o cancelar los cambios conviene que hagas un DBGrid.Repaint para forzar el repintado.

// Saludos

[Alexis De la Cr]

Hola Roman, muchas gracias por tu respuesta. Pues bien, ya lo intente lo que me dices, pero no sucede nada cuando ejecuto dbgrid.repaint, queda de color amarillo el fondo y no hay forma (al menos las que yo conozco) de quitarle ese color

[roman]

El DBGrid va a pintar exactamente lo que tú le digas. Si el color no cambia es entonces porque UpdateStatus sigue siendo distinto de usUnmodified después de cancelar o modificar. De ser esto tendrás que encontrar otra forma de controlar cuándo va de amarillo.

O bien, aunque no me suena del todo, pon explícitamente el color del canvas en blanco en el else:

Código Delphi [-]
if MyQuery1.UpdateStatus <> usUnmodified then
begin
  TCRDBGrid(Sender).Canvas.Brush.Color:= clYellow;
  button3.Enabled:=True;
end
else
begin
  TCRDBGrid(Sender).Canvas.Brush.Color:= clWhite;
end;

// Saludos