怎么为一个空的xml文件创建根节点？

Question

我使用了TXMLDocument网上大多是怎么样操作以后已经存在的xml文件，但是却找不到从零开始，一步步创建xml文档的例子:(
请帮忙！

Answer 1

Delphi里面有一大堆xml控件，查看相关的帮助即可，另Delphi自带的演示里也有。

Answer 2

var root,node,childnode,filenode:Ixmlnode;
    i,j:integer;
    XslFile,NewXsl:string;
    XmlList:Tstringlist;
begin
xmldoc1.Create(filename);//XmlDoc1 为 TXmlDocumnet控件
xmldoc1.DocumentElement :=xmldoc1.CreateElement('addrlist','');
root:=xmldoc1.DocumentElement;
root.SetAttribute('version','3');//root.SetAttribute('version','1');
node:=xmldoc1.CreateNode(' .............',ntcomment,'');
root.ChildNodes.Add(node);
.........
end;