读书人

delphi中TXmlDocument怎样直接设置某

发布时间: 2012-03-16 16:34:56 作者: rapoo

delphi中,TXmlDocument怎样直接设置某个节点的XML值?
delphi中,TXmlDocument的IXMLNode节点怎样设置其XML值?
.NET中可以使用,innerXML和outerXML来设置其XML值
delphi中是否存在此项功能?

[解决办法]
给你个简单的程序;当然我写的可能比较烦;
procedure TForm1.ReadXMLClick(Sender: TObject);
var
i, j: Integer;
NewNode: IXMLNode;
begin
XMLDoc.LoadFromFile( 'Linkmans.xml ');
for i := 0 to XMLDoc.ChildNodes.Count -1 do
begin
for j := 0 to XMLDoc.ChildNodes[i].ChildNodes.Count - 1 do
Edit1.Text := XMLDoc.ChildNodes[i].ChildNodes[j].ChildNodes[ 'LastName '].Text;
end;

end;

procedure TForm1.WriteXMLClick(Sender: TObject);
var
i, j: Integer;
NewNode: IXMLNode;
begin
XMLDoc.LoadFromFile( 'Linkmans.xml ');
for i := 0 to XMLDoc.ChildNodes.Count -1 do
begin
for j := 0 to XMLDoc.ChildNodes[i].ChildNodes.Count - 1 do
XMLDoc.ChildNodes[i].ChildNodes[j].ChildNodes[ 'LastName '].Text := Edit1.Text;
end;
XMLDoc.SaveToFile( 'linkmans.xml ');
end;

另外,你可以导入XML文件!Delphi可以生成对应文件

读书人网 >.NET

热点推荐