Delphi DOM Xml appendChild in for语句

时间:2014-08-22 13:54:03

标签: xml delphi dom

AHello我目前正在开发一个允许xml文件和DataSet交互的项目。

这是我的代码:

    // Number of lines of the DataSet = Number of "REC" element
    for i := 0 to aDataSet.RecordCount - 1 do
    begin
      // Create a new Node
      aNewNode := aXml.createElement('REC');

      for j := 0 to slColumnName.Count - 1 do
      begin
        aNewNode.setAttribute('x','y');
      end;

      // Add new Node
      aNodeTBL.appendChild(aNewNode);
    end;

aNodeTBL - >对应于父节点,我想创建与我的DataSet对齐的节点“REC”。

我可以看到我仍然在“aNewNode”上,所以juste写了一个“REC”节点

我应该重新实例化“aNewNode”吗?

1 个答案:

答案 0 :(得分:0)

尝试使用aNodeTBL.AddChild()代替aXml.createElement()aNodeTBL.appendChild()

// Number of lines of the DataSet = Number of "REC" element
for i := 0 to aDataSet.RecordCount - 1 do
begin
  // Create a new Node
  aNewNode := aNodeTBL.AddChild('REC');

  for j := 0 to slColumnName.Count - 1 do
  begin
    aNewNode.Attributes['x'] := 'y';
  end;
end;