[Darkseratul]

Gracias

El código va de perlas pero mmm tengo un detalle con el código de ecfisa

Código Delphi [-]
uses DateUtils;

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if (Column.Field is TDateTimeField)and
      (DaysBetween(Now,Column.Field.Value) > 15) then
  begin
     DBGrid1.Canvas.Brush.Color:= clRed;
     DBGrid1.Canvas.Font.Color:= clWhite;
     DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
  end;
end;

me da un error cuando unos de los campos(cual sea) esta vació me dice que el campo debe estar lleno como le hago para que los campos que no tengan información(fechas) no los tome en cuenta