Delphi使用TXMLDocument控件解析XML文件教程

Delphi中TXMLDocument控件的用法2008-12-31 上午 10:40
Delphi中对XML文件的解析做的很好，比直接使用MS的MSXML2_TLB中的接口要方便很多，现称述于下面。 
在讲之前先给出一个XML实例，在讲某些部分是要结合实例比较容易理解。
1<?xml version="1.0" encoding="gb2312"?> <!--文档版本信息, 注释格式同HTML-->
2 <XMLPackage>   
3 <clinetinfo ip=”202.101.100.90” handler=”si” unit=”江苏网商软件”/>
4 <data>
5     <row id=”1” name="太阳" sex=”男” age="24" duty="软件工程师"/>
6     <row id=”2” name="月亮" sex=”女” age="25" duty="部门经理"/>
7<!--data中包含了元素 row的两个实例，通过属性id予以区分 -->
8 </data>
9    <memo length=”16” color=” $0034494B”>Hello! I am yaya! </memo> <!-- 这个元素中间包含的内容成为Text,而且也含有两个属性 length， color， 当然也可以没有属性 -- >
10   <Actions acition=”update/insert”/> <!―该元素描述了一动作控制信息-->
11</XMLPackage>
   TXMLDocument控件提供了我们两种常用做法：一、直接用这个类封装的属性和方法来读写XML文件，我把它称为自己解析法；二、用控件提供的XML Data Binding Wizard来创建一个适合用户自己的接口单元，然后按照这个接口单元提供的许多接口来实现对同类XML文件的读写，十分方便，但有局限性，我把它称为控件解析法。我重点讲第一种使用方法。

一、自己解析法：
下面我将按创建、读取、修改、添加和删除这五个动作来分三类讲述。
（1）创建和添加：
   首先要创建XML实例，可以这样动态创建：
   TXMLDocument.Create(‘F:\Work\费亚的文件\task\XML\lab_xml\country.xml’);
   也可以这样动态创建：
   xml:= TXMLDocument.Create(nil);
   Xml. LoadFromFile(‘F:\Work\费亚的文件\task\XML\lab_xml\country.xml’);
   当然也可以从Internet面板上拖放一个TXMLDocument控件，然后再为FileName或XML属性赋值，比如对象名仍然叫xml（下都不说明都这样默认）：
   Xml.FileName:= F:\Work\费亚的文件\task\XML\lab_xml\country.xml;
至于它的另一个属性XML是用来直接赋XML语言，这个用法对我们暂不重要。创建完XML实例后要注意打开Active属性：
   Xml.active:=true;
   这样下面对文件的读写操作才有效。如果没有XML文件可以用来创建XML的实例，即要建立XML文件，可以选择在上面一句之后，对XML实例操作，操作完毕之后加上：
   Xml.SaveToFile(‘F:\Work\费亚的文件\task\XML\lab_xml\country.xml’);