Ver Mensaje Individual
  #5  
Antiguo 08-01-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 24
Caro Va por buen camino
Cita:
Empezado por cslbcn Ver Mensaje
Gracias por responder.
El compilador dice que no reconoce CellRect ni Row
Hola de nuevo, para que reconozca directamente como lo puse, es importante que desprotejas el DBGrid:

Código Delphi [-]
type
  TDBGrid = class(DBGrids.TDBGrid);

Sino, por lo menos has un Cast a TStringGrid:

Código Delphi [-]
  TStringGrid(TDBGrid(Sender)).Canvas.Font.Color := clWhite;
  TStringGrid(TDBGrid(Sender)).Canvas.Brush.Color := clBlue;
  aRect := TStringGrid(TDBGrid(Sender)).CellRect(DataCol+1,TStringGrid(TDBGrid(Sender)).Row);
  TStringGrid(TDBGrid(Sender)).DefaultDrawColumnCell(aRect,DataCol,Column,State);

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita