delphi中xml之xpath查询总结

最新推荐文章于 2024-11-11 16:06:50 发布

iteye_19488

最新推荐文章于 2024-11-11 16:06:50 发布

阅读量731

点赞数

分类专栏： java 文章标签： XML Delphi

java 专栏收录该内容

53 篇文章

订阅专栏

本文介绍了使用Delphi进行DOM初始化及操作的方法，并演示了如何利用XPath进行节点选择和数据提取。通过实例展示了创建DOM文档、加载XML文件、选取特定节点属性及遍历节点列表的过程。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

首先要初始化DOM

initialization
  CoInitialize(nil);
finalization
  CoUnInitialize;

uses   msxml,msxmldom;   
    
  var   
      xdoc   :   IXMLDOMDocument;   
      xdn     :   IXMLDOMNode;   
      s         :   String;   
  begin   
      xdoc:=CreateDOMDocument();   
      xdoc.load('user.xml');   
      xdn:=xdoc.documentElement;   
      s:=xdn.selectSingleNode('/mail/config/folders/folder[@fid="2"]').attributes.getNamedItem('fname').nodeValue;   
      ShowMessage(s);   
  end;

procedure   TForm1.Button1Click(Sender:   TObject);   
  var   
      SelectIntf:IDOMNodeSelect;   
      listIntf:IDOMNodeList;   
      pathstr:string;   
  begin   
      pathstr:='/Countries/Country';   //这儿就是XPATH查询串。   
      SelectIntf:=XMLDocument1.DOMDocument   as     IDOMNodeSelect;   
      listIntf:=SelectIntf.selectNodes(pathstr);   
      ShowMessage(intToStr(     listIntf.length));   
    
    
  end;

uses   msxml;   
    
  var   docNode:IXMLDOMNode;   
  begin   
  docNode:=(XMLDocument1.DocumentElement.DOMNode   as   IXMLDOMNodeRef).GetXMLDOMNode;   
  docNode.selectSingleNode('...........');   
  end;