Ver Mensaje Individual
  #3  
Antiguo 20-07-2021
Avatar de mRoman
mRoman mRoman is offline
Miembro
 
Registrado: nov 2003
Posts: 599
Reputación: 21
mRoman Va por buen camino
Cita:
Empezado por ecfisa Ver Mensaje
Hola.

Se trata de desproteger la clase TStringGrid para acceder a los métodos protegidos, por ejemplo:

Código Delphi [-]
...
interface

uses ..., Grids;

type
  TStringGrid = class( Grids.TStringGrid ); // clase desprotegida

  TForm1 = class( TForm )
    StringGrid1: TStringGrid;
    ...
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

...
begin
  StringGrid1.DeleteColumn( StringGrid1.Col ); // borra columna actual
  StringGrid1.DeleteRow( StringGrid1.Row ); // borra fila actual
end;

El las versiones de Delphi mas actuales deberás usar
Código Delphi [-]
...
uses ..., Vcl.Grids;

type
  TStringGrid = class( Vcl.Grids.TStringGrid );
...

Saludos
Gracias Daniel por contestar.

Entiendo lo que me comentas, pero debo abrir un nuevo FORM, UNIT...es que esa parte no me queda claro.

Gracias.

P. OK...ya hice las modificaciones y ya veo la propiedad DeleteRow.
__________________
Miguel Román

Afectuoso saludo desde tierras mexicanas....un aguachile?, con unas "cetaseas" bien "muertas"?, VENTE PUES !!

Última edición por mRoman fecha: 20-07-2021 a las 23:01:37.
Responder Con Cita