TFPHashList

type TFPHashList = class(TObject)

public

  constructor Create;

  destructor Destroy; override;

  function Add();

  procedure Clear;

  function NameOfIndex();

  function HashOfIndex();

  function GetNextCollision();

  procedure Delete();

  class procedure Error();

  function Extract();

  function IndexOf();

  function Find();

  function FindIndexOf();

  function FindWithHash();

  function Rename();

  function Remove();

  procedure Pack;

  procedure ForEachCall();

  property Count: int32; [r]

  property Capacity: uint32; [rw]

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

  property List: PViHashListItem; [r]

end;

TFPHashList

TObject