treader

type treader = class(tfiler)

public

  constructor Create();

  destructor Destroy; override;

  procedure BeginReferences;

  procedure CheckValue();

  procedure DefineProperty(); override;

  procedure DefineBinaryProperty(); override;

  function beginoflist;

  function EndOfList;

  procedure EndReferences;

  procedure FixupReferences;

  function NextValue;

  procedure Read(); virtual;

  function ReadBoolean;

  function ReadChar;

  function ReadWideChar;

  function ReadUnicodeChar;

  procedure ReadCollection();

  function ReadComponent();

  procedure ReadComponents();

  function ReadFloat;

  function ReadSingle;

  function ReadDate;

  function ReadCurrency;

  function ReadIdent;

  function ReadInteger;

  function ReadInt64;

  function readset();

  function readenum();

  procedure ReadListBegin;

  procedure ReadListEnd;

  function ReadRootComponent();

  function ReadVariant;

  function ReadString;

  function Readutf8String;

  function ReadWideString;

  function ReadUnicodeString;

  function ReadValue;

  procedure CopyValue();

  property Driver: TAbstractObjectReader; [r]

  property Owner: tcomponent; [rw]

  property Parent: tcomponent; [rw]

  property OnError: TReaderError; [rw]

  property OnPropertyNotFound: TPropertyNotFoundEvent; [rw]

  property OnFindMethod: TFindMethodEvent; [rw]

  property OnSetMethodProperty: TSetMethodPropertyEvent; [rw]

  property OnSetName: TSetNameEvent; [rw]

  property OnReferenceName: TReferenceNameEvent; [rw]

  property OnAncestorNotFound: TAncestorNotFoundEvent; [rw]

  property OnCreateComponent: TCreateComponentEvent; [rw]

  property OnFindComponentClass: TFindComponentClassEvent; [rw]

  property OnReadStringProperty: TReadWriteStringPropertyEvent; [rw]

  property onenumerror: enumerroreventty; [rw]

  property onseterror: seterroreventty; [rw]

end;

treader

tfiler

TObject