一个更加强大易用的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%的代码量。
 
 

本文地址：http://com.8s8s.com/it/it4154.htm