加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 百科 > 正文

在BCB6中使用XML

发布时间:2020-12-16 09:33:48 所属栏目:百科 来源:网络整理
导读:——需要的包 #include XMLDoc.hpp ——相关说明 _di_IXMLDocument 为模板类 typedef System::DelphiInterface IXMLDocument _di_IXMLDocument; _di_IXMLNode : typedef System::DelphiInterface IXMLNode _di_IXMLNode; _di_IXMLNodeList 同 ——类方法 //
——需要的包  #include <XMLDoc.hpp>
 ——相关说明 _di_IXMLDocument 为模板类
 typedef System::DelphiInterface< IXMLDocument > _di_IXMLDocument;
 _di_IXMLNode :      typedef System::DelphiInterface< IXMLNode > _di_IXMLNode; 
_di_IXMLNodeList 同  ——类方法  //设置参数
void TXXX::setOptions(String name,String value)
{  //创建文档对象
_di_IXMLDocument XMLDoc = LoadXMLDocument(L"文件路径");
XMLDoc->Active=true;  //文档根节点
_di_IXMLNode root = XMLDoc->DocumentElement;  //想要查找节点
_di_IXMLNode tempNode;  //调用搜索方法
 searchXml(name,root,tempNode);  // 处理
if(tempNode!=NULL) tempNode->SetText(value);
XMLDoc->SaveToFile(L"文件路径"); } //递归搜索参数节点树
 void TXXX::searchXml(String name,_di_IXMLNode &Parent_Node,_di_IXMLNode& tempNode)
{  _di_IXMLNode Child_Node; //子结点 //子节点列表
 _di_IXMLNodeList list = Parent_Node->ChildNodes;
for(int i=0;i<list->Count;i++)
 { Child_Node = list->Get(i); 
//递归结束条件
 if(Child_Node->GetNodeName()==name)
{
tempNode = Child_Node;
break;
}
else
 //递归函数
searchXml(name,Child_Node,tempNode);
 }
} 
 
希望多指教

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读