Delphi与XML

时间:2007-10-31 9:40:30  来源:编程网  作者:asp.net  责任编辑:aspx

////////////////////////////////////////////////////////////////////////

创建IXMLDOMDocument对象的三种方法:

(1)[方法1] 直接创建 IXMLDOMDocument , 例(1)

uses msxml;

var DOC:IXMLDOMDocument;

doc := CoDOMDocument.create;

.....

Doc := nil;

A)doc.load(´C:\temp.xml´); //从文件载入

B) 动态创建

var aElement,aElement2: IXMLDOMElement; // [ aNode:IXMLDOMNode ==> .AppendChild() ]

//加入版本信息 ‘<?xml version="1.0" ?> ’

doc.AppendChild(doc.CreateProcessingInstruction(´xml´, ´version="1.0" encoding="GB2312"´));

(*)因为此函数返回结果不包含 ´encoding="GB2312"´ 故须保存前注意.

//加入根结点

doc.AppendChild(doc.CreateElement(´bootDocNode´)); //// == aElement

//加入子结点

aElement:=IXMLDOMElement(Doc.DocumentElement.AppendChild(Doc.CreateElement(´ChileNode1´)));

//设置接点属性

aElement.SetAttribute(´ID´, ´11´);

aElement.SetAttribute(´Units´, ´元/m2´);

//设置结点内容

aElement.AppendChild(Doc.CreateTextNode(´结点内容´));

添加到各大书签:

相关文章