TVector

type generic TVector <T>= class

public

type

  PT = ^T;

protected

type

  TArr = array of T;

public

  constructor Create;

  function Size;

  procedure PushBack();

  procedure PopBack;

  function IsEmpty;

  procedure Insert();

  procedure Erase();

  procedure Clear;

  function Front;

  function Back;

  procedure Reserve();

  procedure Resize();

  function GetEnumerator;

  property Items []: T; default; [rw]

  property Mutable []: PT; [r]

end;

TVector

TObject