Ver Mensaje Individual
  #4  
Antiguo 25-02-2004
murci murci is offline
Miembro
 
Registrado: jul 2003
Ubicación: Murcia
Posts: 43
Reputación: 0
murci Va por buen camino
En el codigo del envento ONGetCellParams, seria algo asi.

Código:
procedure TForm1.DBGrid1GetCellParams(Sender: TObject; Field: TField;
  AFont: TFont; var Background: TColor; Highlight: Boolean);
begin
  if Highlight then begin
     AFont.Color := clYellow;
     Background := clNavy;
  end;
end;
Espero que te sirva de ayuda.
__________________
J. Adolfo Núñez
Responder Con Cita