Ver Mensaje Individual
  #6  
Antiguo 07-06-2010
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 582
Reputación: 17
jafera Va por buen camino
Me respondo a mi mismo, el código ussado ha sido el siguiente, y funciona

Código Delphi [-]
 
procedure TF_Rebut.JvDBGrid1DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
begin
        If F_ModulDades.RebutAuxCAMPIONAT.Value = 'S' then
        begin
                JVDBGrid1.Canvas.Brush.Color := clRed;
                JVDBGrid1.DefaultDrawColumnCell(rect,DataCol,Column,State);
        end;
end;

Saludos

Josep
Responder Con Cita