TLinkedList

type TLinkedList = class

protected

  fValueAdded: TNotifyEvent;

  StartItem: PItem;

  ItemCount: Integer;

public

  property OnValueAddedd: TNotifyEvent; [rw]

  constructor Create;

  destructor Destroy; override;

  procedure Add();

  procedure AddEnd();

  procedure AddFirst();

  procedure Clear;

  function Count;

  procedure DelAll;

  procedure DelAllFromPos();

  procedure Delete();

  function FIFODequeue;

  procedure FIFOEnqueue();

  function GetData();

  function GetItemCount;

  function GetPos();

  function High;

  function LIFOPop;

  procedure LIFOPush();

  procedure LoadFromFile();

  procedure SaveToFile();

  procedure Show();

end;

TLinkedList

TObject