Ya está, a veces las cosas son más sencillas de lo que parecen:
No he escrito lo que queria en el DBGrid, ya que esto suponia escribir en los datos directamente del Dataset, simplemente para no ver lo que no quiero igualo el color de la fuente con el del fondo, de ese modo no se vé.
Gracias a todos y un saludo.
Código Delphi
[-]
procedure TFPrincipal.RxDBGridPagosObraDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if (RxDBGridPagosObra.Columns[8] = Column) then
if(DMInstalgas.ADOSP_PagosRegFac_Pag.AsString = '01/01/1900') then
begin
RxDBGridPagosObra.Canvas.Font.Color := RxDBGridAlbaran.Color;
end;
RxDBGridPagosObra.DefaultDrawColumnCell(rect,DataCol,Column,State);
end;