Delphi xml文件的修改
文件内容如下：
<?xml version="1.0" encoding="utf-8"?>
<caches>
<cache name="地区信息" dll_name="BLLPack.bpl" method="CacheRegion" size="325" necessary="1" cache_way="1">
<tables>
<item name="region" update_date="2010-02-02 12:12:12:000" />
<item name="hospital_region" update_date="2010-02-02 12:12:12:000" />
</tables>
</cache>
<caches>
如何能修改update_date的值
[解决办法]
uses
XMLIntf, XMLDoc;
procedure TForm1.Button2Click(Sender: TObject);
var
xmlDoc: IXMLDocument;
Node: IXMLNode;
NodeList: IXMLNodeList;
begin
xmlDoc := TXMLDocument.Create(nil);
xmlDoc.Active := true;
xmlDoc.Version := '1.0';
xmlDoc.Encoding := 'GB2312';
xmlDoc.LoadFromFile('c:\a.xml');
NodeList := xmldoc.DocumentElement.ChildNodes['cache'].ChildNodes['tables'].ChildNodes;
Node := NodeList.First ;
Node.SetAttribute('update_date', 'abc');
xmlDoc.SaveToFile('c:\a.xml');
xmlDoc := nil;
end;
[解决办法]
可以用XML绑定，然后直接用绑定对象加载，然后修改就可以了，这样非常简单。
[解决办法]
顶1楼
不过，如果1楼代码报错
可能1：删除 xmlDoc.Version := '1.0';xmlDoc.Encoding := 'GB2312';
可能2：查看 TxmlDocument的Encoding属性
