利用XE7的OmniXML完成XML文件的处理,支持跨平台
发布时间:2020-12-16 00:20:36 所属栏目:百科 来源:网络整理
导读:OmniXML是XE7提供的新DOM,传说比ADOM还要快,实际操作确实如此,这次我们来做几个文件操作, 首先在控件页上加上TXMLDocument控件,然后给控件命名为XMLDoc, 修改DOMVendor属性为OmniXML即可完成,操作与原来一样, 另外还有MSXML和ADOM,MSXML只能在windo
OmniXML是XE7提供的新DOM,传说比ADOM还要快,实际操作确实如此,这次我们来做几个文件操作, 首先在控件页上加上TXMLDocument控件,然后给控件命名为XMLDoc, 修改DOMVendor属性为OmniXML即可完成,操作与原来一样,
另外还有MSXML和ADOM,MSXML只能在windows里面用,不能跨平台,就是说你的程序在Android或者iOS下可能出问题,虽然ADOM能够跨平台,但它的效率目前比较慢,下面是几个操作代码: 几个参数说明:
AppPath //可以由TPath.GetHomePath取出的,TPath为跨平台的路径生成函数 TPath.DirectorySeparatorChar //路径分隔符,在windows是"",在Android是"/" AppParamFileName //自己定义的放参数的文件名称 读取XML文件:
if TFile.Exists(AppPath+TPath.DirectorySeparatorChar+AppParamFileName) then begin //加载XML文件 XMLDoc.LoadFromFile(AppPath+TPath.DirectorySeparatorChar+AppParamFileName); XMLRoot := XMLDoc.DocumentElement; if XMLRoot<>nil then begin XMLNode := XMLRoot.ChildNodes['LoginInfo']; if XMLNode<>nil then begin RememberMe := XMLNode.AttributeNodes['RememberMe'].NodeValue; end; end; end else begin //没找到文件则创建 CreateAppParamFile; RememberMe := 0; end;
创建XML文件:
//XML初始化 XMLDoc.Active := True; XMLDoc.Version := '1.0'; XMLDoc.Encoding := 'GB2312'; //创建根节点 XMLRoot := XMLDoc.CreateNode('SoftPreferences'); XMLDoc.DocumentElement := XMLRoot; //创建节点 XMLNode := XMLDoc.CreateNode('LoginInfo'); XMLDoc.DocumentElement.ChildNodes.Add(XMLNode); XMLNode.AttributeNodes.Add(XMLDoc.CreateNode('RememberMe',ntAttribute)); XMLNode.SetAttributeNS('RememberMe','',0); ... XMLDoc.SaveToFile(AppPath+TPath.DirectorySeparatorChar+AppParamFileName); XMLDoc.Active := False; 保存XML文件:
XMLDoc.LoadFromFile(AppPath+TPath.DirectorySeparatorChar+AppParamFileName); XMLDoc.Active := True; XMLRoot := XMLDoc.DocumentElement; if XMLRoot<>nil then begin XMLNode := XMLRoot.ChildNodes['LoginInfo']; if XMLNode<>nil then begin XMLNode.SetAttributeNS('RememberMe',RememberMe); end; end; XMLDoc.SaveToFile(AppPath+TPath.DirectorySeparatorChar+AppParamFileName); XMLDoc.Active := False; (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |