一个更加强大易用的XML库 -- NativeXML

源代码网整理以下 原来一直使用Delphi自带的TXMLDocument类来进行XML文件的读写，虽然麻烦了一点，但功能上来说还不错。只是有一个地方让我实在不舒服 - 每次创建TXMLDocument类实例的时候必须传入TComponent对象，这就意味着，如果我把对XML文件的读写封装到一个类里面，那么在创建这个自定义类的时候就必须也传入TComponent对象。
我尝试过很多方法，但是都无法避免，最后试着上网找了找，于是就找到了NativeXML这个库。
下载之后马上打开Demo看了看，cool，创建TNativeXML的时候只需要传入xml文件路径就可以，再往下看就让我开始惊喜了。它已经把大多数操作都封装好了，而且还具有把任意对象序列化的能力。
比如，你能把整个Form通过 TsdXmlObjectWriter = class(TPersistent) 类存入一个XML文件，下次再读取。这样使得远程传输对象变得很简单了。
下面就是一个使用NativeXML库的例子：
目标XML结构:
<bookshift>
<book author = "test_author">
<date>2000-01-01</date>
</book>
</bookshift>

delphi 代码:

procedure WriteTest;
var
xml : TNativeXML;
n_bs : TXMLNode;
begin
//建立根节点
xml := TNativeXml.CreateName("bookshift");

xml.EncodingString := "GB2312";
//输出风格为易读
xml.XmlFormat := xfReadable;

//建立Book节点
n_bs := xml.Root.NodeNew("book");
//写入Book节点的属性
n_bs.WriteAttribuiteString("author","test_author");
//建立Book节点下属date节点并写入值
n_bs.WriteString("date","2000-01-01");

xml.SaveToFile("test.xml");
end;

打开test.xml文件看看吧，和上面的格式一摸一样。
很简单吧，我用这个库重写了原来的XML访问类，大约节省了40%的代码量。