1

我需要使用 Delphi 处理 XML 文件。

我想将 DBGrid 中的 xml 数据呈现给用户,并将用户所做的更改保存在 XML 文件中。

例如,在下面的 xml(呈现给用户)中,如果用户changed City of ABC under clientadded a new customer with NickName as "AAA"这些更改应该反映在 XML 文件中。

<Data LinkID=”0”&gt;
  <Client>
      <Item Name=”ABC” Mobile=”1234” City=”IN” />
      <Item Name=”PQR” Mobile=”5678” City=”IN” />
  </Client>
  <Customer>
    <Item NickName=”XYZ” Phone=”1254” City=”IN” />
    <Item NickName=”MNO” Phone =”41255” City=”IN” />
  </Customer>
</Data>

我正在使用 XMLDocument 和 ClientDataSet 来实现这一点,但没有成功。

谁能帮助我实现这一目标?

4

1 回答 1

4

问题在于我正在使用的 XML 文件。

XML 文件应采用必须具有<METADATA> and <ROWDATA>标签的指定格式。

我将xml更改为该格式。

<?xml version="1.0" standalone="yes"?>  
<DATAPACKET Version="2.0">
<METADATA>
<FIELDS>
<FIELD attrname="Name" fieldtype="string" WIDTH="50"/>
<FIELD attrname="Mobile" fieldtype="string" WIDTH="20"/>
<FIELD attrname="City" fieldtype="string" WIDTH="20"/>
</FIELDS><PARAMS CHANGE_LOG="6 1 8"/>
</METADATA>
<ROWDATA>
<ROW Name="ABC" Mobile="1234" City="IN"/>
<ROW Name="PQR" Mobile="5678" City="IN"/>
<ROW Name="AAA" Mobile="7894" City="IN"/>
<ROW Name="MNO" Mobile="4569" City="IN"/>
<ROW Name="ABC" Mobile="45685" City="IN"/>
</ROWDATA>
</DATAPACKET>

接下来我用来 ClientDataSet1.LoadFromFile('E:\projects\XML\Sample App with CDS\XmlText.xml');读取 XML 文件。

在网格中完成修改后,我使用ClientDataSet1.SaveToFile('E:\projects\XML\Sample App with CDS\XmlText.xml',dfXML);方法保存回 XML。

为此目的不需要 XMLDocument。

于 2010-10-22T09:27:09.997 回答