TVorbisComment

type TVorbisComment = class

public

  fName: string;

  Format: TVorbisCommentFormat;

  Stream: TMemoryStream;

  Index: Integer;

  Parent: TFlacTag;

  constructor Create;

  destructor Destroy; override;

  function GetAsText;

  function SetAsText();

  function GetAsList();

  function SetAsList();

  procedure Clear;

  function Assign();

  function CalculateTotalFrameSize;

  function Delete;

end;

TVorbisComment

TObject