Delphi7向常用的XML文件中添加内容，按照XML的节点规则依次写入内容，自定义各个节点及节点内容，具体的操作代码如下示：
var
iXml:IDOMDocument;
iRoot,iNode,iNode2,iChild,iAttribute:IDOMNode;
begin
XMLDocument1.Active:=False;
XMLDocument1.XML.Text:='';
XMLDocument1.Active:=True;
iXml:=XMLDocument1.DOMDocument;
