Class TSerializable

Unit

PasDoc_Serialize

Declaration

type TSerializable = class(TObject)

Description

Hierarchy

• TObject
• TSerializable

Overview

Methods

	procedure Serialize(const ADestination: TStream); virtual;
	procedure Deserialize(const ASource: TStream); virtual;
	class function Read7BitEncodedInt(const ASource: TStream): Integer;
	class procedure Write7BitEncodedInt(Value: Integer; const ADestination: TStream);
	class function LoadStringFromStream(const ASource: TStream): string;
	class procedure SaveStringToStream(const AValue: string; const ADestination: TStream);
	class function LoadDoubleFromStream(const ASource: TStream): double;
	class procedure SaveDoubleToStream(const AValue: double; const ADestination: TStream);
	class function LoadIntegerFromStream(const ASource: TStream): Longint;
	class procedure SaveIntegerToStream(const AValue: Longint; const ADestination: TStream);
	constructor Create; virtual;
	class procedure SerializeObject(const AObject: TSerializable; const ADestination: TStream);
	class function DeserializeObject(const ASource: TStream): TSerializable;
	class procedure Register(const AClass: TSerializableClass);
	procedure SerializeToFile(const AFileName: string);
	class function DeserializeFromFile(const AFileName: string): TSerializable;

Properties

property WasDeserialized: boolean read FWasDeserialized;

Description

Methods

	procedure Serialize(const ADestination: TStream); virtual;

	procedure Deserialize(const ASource: TStream); virtual;

	class function Read7BitEncodedInt(const ASource: TStream): Integer;

	class procedure Write7BitEncodedInt(Value: Integer; const ADestination: TStream);

	class function LoadStringFromStream(const ASource: TStream): string;

	class procedure SaveStringToStream(const AValue: string; const ADestination: TStream);

	class function LoadDoubleFromStream(const ASource: TStream): double;

	class procedure SaveDoubleToStream(const AValue: double; const ADestination: TStream);

	class function LoadIntegerFromStream(const ASource: TStream): Longint;

	class procedure SaveIntegerToStream(const AValue: Longint; const ADestination: TStream);

	constructor Create; virtual;

	class procedure SerializeObject(const AObject: TSerializable; const ADestination: TStream);

	class function DeserializeObject(const ASource: TStream): TSerializable;

	class procedure Register(const AClass: TSerializableClass);

	procedure SerializeToFile(const AFileName: string);

	class function DeserializeFromFile(const AFileName: string): TSerializable;
Read back from file. Exceptions raised EInvalidCacheFileVersion When the cached file contents are from an old pasdoc version (or invalid).

Properties

	property WasDeserialized: boolean read FWasDeserialized;