TStringMatrix

type TStringMatrix = class(TObject)

public

  constructor Create;

  destructor Destroy; override;

  property ColCount: Integer; [rw]

  property Data: String; default; [rw]

  property RowCount: Integer; [rw]

  property OnCellChanged: TCellChangedEvent; [rw]

  procedure InsertRow();

  procedure InsertColumn();

  procedure DeleteRow();

  procedure DeleteColumn();

  procedure Matrix2XML();

  procedure XML2Matrix();

end;

TStringMatrix

TObject