TFPHashObjectList

type TFPHashObjectList = class(TObject)

protected

  function GetItem();

  procedure SetItem();

  procedure SetCapacity();

  function GetCapacity;

public

  constructor Create();

  destructor Destroy; override;

  procedure Clear;

  function Add();

  function NameOfIndex();

  function HashOfIndex();

  function GetNextCollision();

  procedure Delete();

  function Expand;

  function Extract();

  function Remove();

  function IndexOf();

  function Find();

  function FindIndexOf();

  function FindWithHash();

  function Rename();

  function FindInstanceOf();

  procedure Pack;

  procedure ShowStatistics;

  procedure ForEachCall();

  property Capacity: Integer; [rw]

  property Count: Integer; [rw]

  property OwnsObjects: Boolean; [rw]

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

  property List: TFPHashList; [r]

end;

TFPHashObjectList

TObject