Cita:
Empezado por ecfisa
Hola olbeup.
Una consulta, ¿ que clase es TGridCell ? no pude encontrar referencias.
Saludos
|
Esta clase es creada por mi, la información de cada celda la tiene TGridCell, que es:
Código Delphi
[-]type
TGridCell = class(TObject)
private
FAlignment: TAlignment; FCoordCell: TCoordCell; FFontCell: TFontCell; FTextCell: String; FServiceCell: TServiceCell; protected
FStrGrid: TStringGrid; function GetDrawAlign: Integer;
public
constructor Create(StrGrid: TStringGrid);
destructor Destroy; override;
procedure RefreshCell;
published
property Alignment: TAlignment read FAlignment write FAlignment;
property DrawAlign: Integer read GetDrawAlign;
property CoordCell: TCoordCell read FCoordCell write FCoordCell;
property FontCell: TFontCell read FFontCell write FFontCell;
property TextCell: String read FTextCell write FTextCell;
property ServiceCell: TServiceCell read FServiceCell write FServiceCell;
end;
El problemas es cuando al dibujar el cuadro de las celdas, sólo dibuja la primera al hacer click en la celda que tiene dibujado varias celdas.
Un saludo.