Delphi操作XML(九)

4.1.10.TsdSurplusReader 类

　　 TsdSurplusReader = class

　　 TsdSurplusReader 是一个简单的类，它可以存储少许字符，并可以在读取基础流前，返回这些字符。

4.1.10.1.Surplus

　　 property Surplus:
UTF8String;

4.1.10.2.Create

　　 constructor Create(AStream: TStream);

4.1.10.3.ReadChar

　　 function ReadChar(var Ch:
AnsiChar): integer;

4.1.10.4.ReadCharSkipBlanks

　　 function
ReadCharSkipBlanks(var Ch: AnsiChar): boolean;

4.1.11.TsdUtf8Stream 类

　　 TsdUtf8Stream =
class(TsdCodecStream)

　　 TsdUtf8Stream 是一个转换流，将装载的 ANSI 、 UTF8 或 Unicode 文件，转换成 UTF8 。该流也可以将 UTF8 数据保存为 ANSI 、 UTF8 或 Unicode 。

4.1.12.TsdUTF8StringList 类

　　 TsdUTF8StringList =
class(TPersistent)

　　非常简单的字符串列表，用于管理保存在节点上的属性列表

4.1.12.1.Count

　　 property Count: integer;

4.1.12.2.Items

　　 property Items [Index:
integer]: UTF8String;

4.1.12.3.Names

　　 property Names [Index:
integer]: UTF8String;

4.1.12.4.Text

　　 property Text: UTF8String;

4.1.12.5.Values

　　 property Values [const
Name: UTF8String]: UTF8String;

4.1.12.6.Add

　　 function Add(const S:
UTF8String): integer;

4.1.12.7.Assign

　　 procedure Assign(Source:
TPersistent); override;

4.1.12.8.Clear

　　 procedure Clear;

4.1.12.9.Delete

　　 procedure Delete(Index:
Integer);

4.1.12.10.IndexOfName

　　 function IndexOfName(const
Name: UTF8String): integer;

4.1.13.TsdUTF8StringStream 类

　　 TsdUTF8StringStream =
class(TMemoryStream)

4.1.13.1.Create

　　 constructor Create(const S:
UTF8String);

4.1.13.2.DataString

　　 function DataString:
UTF8String;

4.1.14.TsdXmlObjectReader 类

　　 TsdXmlObjectReader =
class(TPersistent)

　　使用 TsdXmlObjectReader 可以从一个 XML 节点读取任何 TPersistent 后代公布的属性。

　　译者注：该类不支持东方语言字符串，如果某节点中引用了没经 RegisterClass 注册的类，会引发异常。

4.1.14.1.CreateComponent

　　 function
CreateComponent(ANode: TXmlNode; AOwner: TComponent; AParent: TComponent;
AName: string): TComponent;

　　调用 CreateComponent 方法，首先创建 AComponent ，然后从 TXmlNode 类型的 ANode 读取其公布的属性。指定 AParent 为了解决 Parent 正确的方法和事件参考。为了成功地从头开始创建组件，组件的类必须事先调用 RegisterClass 进行登记。指定 Aowner 将为所有者组件添加该组件为子组件。这通常是一个形式。指定 AName 作为创建的组件的新组件的名称。

4.1.14.2.ReadComponent

　　 procedure
ReadComponent(ANode: TXmlNode; AComponent: TComponent; AParent: TComponent);

　　调用 ReadComponent 从 TXmlNode 类型的 ANode 读取 AComponent 公布的属性。指定 AParent 为了解决 Parent 正确的方法和事件参考。

　　 ReadComponent 调用 ReadObject 完成工作。

4.1.14.3.ReadObject

　　 procedure ReadObject(ANode:
TXmlNode; AObject: TObject; AParent: TComponent);

　　调用 ReadObject 从 TXmlNode 类型的 ANode 读取 AObject 公布的属性。指定 AParent 为了解决 Parent 正确的方法和事件参考。

4.1.15.TsdXmlObjectWriter 类

　　 TsdXmlObjectWriter =
class(TPersistent)

　　使用 TsdXmlObjectWriter 可以将任何 TPersistent 后裔公布的属性，写入到一个 XML 节点。

4.1.15.1.WriteComponent

　　 procedure
WriteComponent(ANode: TXmlNode; AComponent: TComponent; AParent: TComponent);

　　调用 WriteComponent 将 AComponent 的公布的属性写入到 TxmlNode 类型的 ANode 中。指定 AParent 为了储存 Parent 正确的方法和事件参考。

　　译者注： WriteComponent 调用 WriteObject 完成工作。

4.1.15.2.WriteObject

　　 procedure
WriteObject(ANode: TXmlNode; AObject: TObject; AParent: TComponent);

　　调用 WriteObject 将 AObject 的公布的属性写入到 TxmlNode 类型的 ANode 中。指定 AParent 为了储存 Parent 正确的方法和事件参考。