TIdReplies

type TIdReplies = class(TOwnedCollection)

protected

  function GetItem();

  procedure SetItem();

public

  function Add();

  constructor Create(); virtual;

  function Find(); virtual;

  procedure UpdateText(); virtual;

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

end;

TIdReplies

TObject