文件内容如下:
<?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的值
<?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的值
解决方案 »
- delphi中与sql server数据库连接的问题
- 请问怎样在程序中,给MSSQL数据库备份??????对了,还有压缩等
- 你觉得女孩的年龄在哪有个坎?
- 请问用网络打印,如果控制打印服务器的话,如何截获别的计算机的打印内容??
- 新手上路,请多关照,一个小问题,别介意简单!
- Excel的导出问题
- Access数据库操作问题,期盼高手!!!
- 请问大家一个问题,怎样在RICHEDIT中怎么样在一行字后加入一个图片
- 各位大侠,进来看看,有没有这样的控件?
- 超时问题(初学者的困惑)
- 如何获取带LVS_OWNERDATA样式的ListView里的数据
- 用Clientdataset、Append追加记录,如何即时在Dbgrid上显示出来?
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;
不过,如果1楼代码报错
可能1:删除 xmlDoc.Version := '1.0';xmlDoc.Encoding := 'GB2312';
可能2:查看 TxmlDocument的Encoding属性