[marcoszorrilla]

Aquí tienes una muestra, cambia la condición y listo:

Código Delphi [-]
 procedure TfrConClientes.DBGrid1DrawColumnCell(Sender: TObject;
   const Rect: TRect; DataCol: Integer; Column: TColumn;
   State: TGridDrawState);
 begin
    if DmHH.CliBaja.Value = True then
    begin
    DBGrid1.Canvas.Brush.Color :=clInfobk;
    Dbgrid1.Canvas.Font.Style:=[fsBold];
    DBGrid1.Canvas.Font.Color:=ClBlack;
    DBGrid1.DefaultDrawColumnCell(Rect,Datacol,Column,State);
    end;
 end;

Un Saludo.