[novato_erick]

Empezado por Casimiro Notevi

Te falta "repintarlo" con los cambios, algo así:

Código Delphi [-]
if Column.Field = ClientDataSet1SALDO then
  if ClientDataSet1SALDO.AsCurrency < 200 then
  begin
    DBGrid1.Canvas.Font.Color := clRed;
    DBGrid1.DefaultDrawDataCell(rect,Column.Field,State);
  end;

Hola Casimiro gracia por tu extrema rápida respuesta :
cabe señalar que

Código Delphi [-]
   DBGrid1.Canvas.Font.Color := clRed; //Trabaja es con el color de fuente no con celda en mi caso es la celda de la columna 
   DBGrid1.DefaultDrawDataCell(rect,Column.Field,State);// esto pone encima un color en la fuente desagradable
//t al pintarse al cual si sufriera uno de miopía