Delphi XML文件操作求教，很急

[qq_34656542]

<?xml version="1.0" encoding="gb2312"?>
<root>
<fileType name="config">
<file name="newqysdsyb15nb_PZ.xml" modifyDate="2016-04-04 11:11:11"/>
<file name="newqysds3m15nb_PZ.xml" modifyDate="2016-03-17 11:11:11"/>
<file name="newqysdsnb2014_PZ.xml" modifyDate="2016-03-17 11:11:11"/>
<file name="newqysdsnb2015_PZ.xml" modifyDate="2016-04-07 11:11:11"/>
<file name="newgrtzzsdsB_PZ.xml" modifyDate="2016-03-14 11:11:11"/>
<file name="dkdjbgb_PZ.xml" modifyDate="2016-02-04 11:11:11"/>
<file name="dqdenssbb_PZ.xml" modifyDate="2016-02-05 11:11:11"/>
<file name="tdhygrsdsndsbb_PZ.xml" modifyDate="2016-02-04 11:11:11"/>
<file name="Cgrsdssbb_PZ.xml" modifyDate="2016-01-04 11:11:11"/>
<file name="newgrsdssyybA_PZ.xml" modifyDate="2016-03-14 11:11:11"/>
<file name="newgrtzzsdsA_PZ.xml" modifyDate="2016-03-14 11:11:11"/>
<file name="newqysds3m15_PZ.xml" modifyDate="2016-01-13 11:11:11"/>
比如这里面的 <file name="newqysdsnb2015_PZ.xml" modifyDate="2016-04-07 11:11:11"/>下面添加一条<file name="dqdenssbb_PZ.xml" asdafyDate="2016-12-05 11:11:11"/>怎么加，急求，各位

[lyhoo163]

procedure TForm1.Button36Click(Sender: TObject);
var i:integer;
    nodeList,nodeList1:IXMLNodeList;
    XMLAddNode,XMLRootNode,XMLnode1:IXMLNode;
    sDate,sName:string;
begin
  sDate:='2016-12-05 11:11:11';
  sName:='dqdenssbb_PZ.xml';

  XMLDocument1.LoadFromFile('My2.xml');
  Memo1.Lines.Text := FormatXMLData(XMLDocument1.XML.Text);
  XMLRootNode := XMLDocument1.DocumentElement;                        // 根节点
  NodeList:=XMLRootNode.ChildNodes;                                   // 第1级
  fOR I:=0 TO NodeList.Count-1 DO
  BEGIN
    XMLNode1:=NodeList.Get(i);
    if XMLNode1.NodeName='fileType' then
    begin
      XMLAddNode := XMLNode1.AddChild('file');               // 添加子节点
      XMLAddNode.SetAttribute('name',sName);                 // 属性名,属性值
      XMLAddNode.SetAttribute('modifyDate',sDate);           // 属性名,属性值
    end;
  end;
  XMLDocument1.SaveToFile('my2.xml');                                      // 保存XML文件
end;

[xiaoyongxiao]

先把这句 <file name="newqysdsnb2015_PZ.xml" modifyDate="2016-04-07 11:11:11"/>改成以下两句： <file name="newqysdsnb2015_PZ.xml" modifyDate="2016-04-07 11:11:11"> </file> 然后往这两句中间加节点就是子节点了，比如： <file name="newqysdsnb2015_PZ.xml" modifyDate="2016-04-07 11:11:11"> <file2 name="dqdenssbb_PZ.xml" modifyDate="2016-02-05 11:11:11"/> </file>