delphi 操作 xml,为啥存不进去呢?
sTempFile := OpenConfigFile('config.xml');
xmlPassBox:=CreateOleObject('MSXML.DOMDocument') as IXMLDOMDocument;
xmlPassBox.load(sTempFile);
xmlNodeTop := xmlPassBox.selectSingleNode('/Config');
xmlNodeRecord := xmlPassBox.createElement('Other'); xmlNodeValue := xmlPassBox.createElement('Sskin');
xmlNodeValue.text := Trim(cxCBSkin.EditText);
xmlNodeRecord.appendChild(xmlNodeValue);
xmlPassBox.save(sTempFile);
sTempFile := OpenConfigFile('config.xml');
xmlPassBox:=CreateOleObject('MSXML.DOMDocument') as IXMLDOMDocument;
xmlPassBox.load(sTempFile);
xmlNodeTop := xmlPassBox.selectSingleNode('/Config');
xmlNodeRecord := xmlPassBox.createElement('Other'); xmlNodeValue := xmlPassBox.createElement('Sskin');
xmlNodeValue.text := Trim(cxCBSkin.EditText);
xmlNodeRecord.appendChild(xmlNodeValue);
xmlPassBox.save(sTempFile);
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货