简析Delphi中的XML编程

XML（eXtensible Markup Language可扩展标志语言）在近几年的信息类杂志、网站上可谓是最抢眼的一词。大大小小的信息产品都争相和它搭上关系，唯恐赶不及这辆快车。有着良好口碑的宝蓝 （Borland)系列开发平台也不例外，从6.0版开始就集成了XML组件包，因其使用MSXMLDom解析器，相比于此前广泛应用的XMLParser解析器，MSXMLDom更显规范、中文兼容性更好（元素名、属性名均支持中文），很受开发者青睐。为帮助初学者快速掌握Delphi中的XML编程，笔者特写此文，以供交流。
笔者通过一个读写XML文件的实例来说明XML编程的各个步骤，只需读者有结点、元素、属性的基本概念就能容易的理解本文。笔者所要读入的XML文件结构如下所示，命名为Input.xml。

　　Input.xml文件的第一行是XML的版本说明，属性encoding宣告使用何种字符集建立，默认以Unicode 编码（UTF-8 或UTF-16），这里用中文GB2312码。第二行“＜学生花名册＞“是根元素。下面定义了两个学生元素,学生下面嵌套了三个子元素，是对学生的进一步说明。与之相对应的，我们在Delphi中定义如下的学生数据结构,"//"后面的文字是对变量或语句的说明，下同。

TStudent = class {学生} sex : string; //学生性别 name : string; //学生姓名 age : integer; //学生年龄 phone: string; //电话号码 end;

　　为了读写，我们需要放置两个TXMLDocument控件，在Delphi VCL面板的Internet标签页里那个标有XML字样的控件就是，当然此控件也可以动态创建，但需要包含必要的文件，这里为简单起见，我们直接放置在窗体上，分别命名为InXMLDoc和OutXMLDoc，InXMLDoc用于调入Input.xml文件，OutXMLDoc用于暂存输出到Output.xml的文档。