使用delphi读取xml的其中几项数据,并生成一个标准格式的xml,请问应该怎么做啊?最好有源码或主要代码 200

原始格式xml<?xmlversion="1.0"encoding="UTF-8"standalone="yes"?><DATAPACKETVersion="2.0"><... 原始格式xml
<?xml version="1.0" encoding="UTF-8" standalone="yes"?

><DATAPACKET Version="2.0"> <METADATA>

<FIELDS> <FIELD attrname="编码"

fieldtype="string" required="true" WIDTH="16">

<PARAM Name="PROVFLAGS" Value="7" Type="i4"

Roundtrip="True"/> </FIELD>

<FIELD attrname="名称" fieldtype="string"

required="true" WIDTH="100"/> <FIELD

attrname="简码" fieldtype="string" WIDTH="6"/>

<FIELD attrname="上级码长" fieldtype="i2"/>

<FIELD

attrname="销售退回科目" fieldtype="string" WIDTH="20"/>

</FIELDS> <PARAMS READONLY="TRUE"

DEFAULT_ORDER="1" PRIMARY_KEY="1" LCID="0"/> </METADATA>

<ROWDATA> <ROW 编码="1" 名称="电脑" 上级码长="0"

下级码长="2" 商品税目="1502" 税率="0.17" 规格型号="1" 计量单位

="台" 单价="0" 含税价标志="TRUE"/> <ROW 编码="10"

名称="复印纸" 上级码长="1" 下级码长="0" 商品税目="4001" 税率

="0.17" 计量单位="件" 单价="0" 含税价标志="TRUE"/>

<ROW 编码="11" 名称="色带" 上级码长="1" 下级码长="0" 商品税目

="4001" 税率="0.17" 计量单位="根" 单价="0" 含税价标志="TRUE"/>

</ROWDATA></DATAPACKET>

标准xml
<?xml version="1.0" encoding="GB2312"?>
<Data TYPE="SPBIANMA"><FENLEI><Row BM="100" PID="0" MC="一般货物"/><Row BM="101" PID="0" MC="简易征收"/><Row BM="102" PID="0" MC="一般商品13%"/><Row BM="103" PID="0" MC="代码转换"/><Row BM="104" PID="0" MC="劳务"/></FENLEI><SPXX><Row BM="10000006" PID="100" MC="打印机" JM="DYJ" SPSM="000002" SL="0.17" GGXH="FP620K+" JLDW="台" DJ="" HSBZ="1"/></SPXX></Data>
展开
 我来答
  • 你的回答被采纳后将获得:
  • 系统奖励15(财富值+成长值)+难题奖励10(财富值+成长值)+提问者悬赏200(财富值+成长值)
windblast
2015-04-26 · 知道合伙人软件行家
windblast
知道合伙人软件行家
采纳数:5633 获赞数:13617
毕业于空军第一航空学院电子专业,1991年开始接触电脑,从事多年计算机编程,具有较丰富的经验。

向TA提问 私信TA
展开全部

获取xml文件属性的代码:


procedure TForm1.Button2Click(Sender: TObject);
var
  xml: TNativeXml;
  node : TXmlNode;
  i: Integer;
begin
  xml := TNativeXml.Create(nil);
  node := xml.Root.NodeByName('ROWDATA');
  for i := 0 to node.ElementCount-1 do
  begin
    ShowMessage(node.Elements[i].AttributeByName['名称'].Value);
  end;
  xml.Free;
end;
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式