Código Delphi [-] type TDBGrid = class(DBGrids.TDBGrid); ... var LeftCol: Integer; begin LeftCol := TDBGrid(DBGrid1).LeftCol; ... TDBGrid(DBGrid1).LeftCol := LeftCol; end;
type TDBGrid = class(DBGrids.TDBGrid); ... var LeftCol: Integer; begin LeftCol := TDBGrid(DBGrid1).LeftCol; ... TDBGrid(DBGrid1).LeftCol := LeftCol; end;