TUnicodeStringArray

type TUnicodeStringArray = class(AUnicodeStringArray)

protected

  FData: UnicodeStringArray;

  FCapacity: Integer;

  FCount: Integer;

  function GetCount; override;

  procedure SetCount(); override;

  function GetItem(); override;

  procedure SetItem(); override;

  function GetRange(); override;

  procedure SetRange(); override;

  procedure SetData(); virtual;

public

  constructor Create(); overload;

  procedure Assign();

  procedure ExchangeItems(); override;

  function DuplicateRange(); override;

  procedure Delete(); override;

  procedure Insert(); override;

  function AppendItem(); override;

  property Data: UnicodeStringArray; [rw]

  property Count: Integer; [rw]

end;

TUnicodeStringArray

AUnicodeStringArray

AArray

AType

TObject