tlinkedqueue

type tlinkedqueue = class(tpointerqueue,iobjectlink)

public

  constructor create();

  destructor destroy; override;

  function destroying;

  function add();

  procedure insert();

  function getfirst;

  function getlast;

  procedure sendchangenotification();

  property items []: iobjectlink; default; [rw]

  property ownsobjects: Boolean; [rw]

end;

tlinkedqueue

tpointerqueue,iobjectlink

tpointerlist

tnullinterfacedobject

TObject,iunknown