Ver Mensaje Individual
  #2  
Antiguo 05-05-2005
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
Código Delphi [-]
procedure TForm2.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
   DataCol: Integer; Column: TColumn; State: TGridDrawState);
 begin
    if  (gdSelected in State)  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;

Aquí tienes un ejemplo, aunque creo que el problema que tienes es que no has marcado la opción:
Options: dgRowSelect = True.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita