文档章节

Delphi 中的 XMLDocument 类详解(4) - 获取根目录下的元素数

涂孟超
 涂孟超
发布于 2014/09/26 15:31
字数 257
阅读 2
收藏 0
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, xmldom, XMLIntf, msxmldom, XMLDoc, StdCtrls;

type
  TForm1 = class(TForm)
    XMLDocument1: TXMLDocument;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

//打开
procedure TForm1.FormCreate(Sender: TObject);
begin
  XMLDocument1.LoadFromFile('c:\temp\test.xml');
end;


//获取根目录下的元素数(1)
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(XMLDocument1.DocumentElement.ChildNodes.Count)); {4}
  {DocumentElement 是根节点}
  {ChildNodes 是节点包含的子节点的列表}
end;


//获取根目录下的元素数(2) 
procedure TForm1.Button2Click(Sender: TObject);
var
  nodeList: IXMLNodeList; {定义一个节点列表对象}
begin
  nodeList := XMLDocument1.DocumentElement.ChildNodes;
  {把根节点下的子节点列表赋给节点列表对象}

  ShowMessage(IntToStr(nodeList.Count)); {4}
end;


//获取根目录下的元素数(3) 
procedure TForm1.Button3Click(Sender: TObject);
var
  node: IXMLNode;         {定义一个节点对象}
  nodeList: IXMLNodeList; {定义一个节点列表对象}
begin
  node := XMLDocument1.DocumentElement;
  {根节点也是一个节点, 把它赋给节点对象}

  nodeList := node.ChildNodes;
  ShowMessage(IntToStr(nodeList.Count)); {4}
end;

end.

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/01/03/1024407.html

涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
Cocos数据篇[3.4](3) ——XML数据操作

【唠叨】 XML 即 可扩展标记语言,在游戏开发中,常用于保存游戏数据信息,如最高分、游戏等级等信息,和描述一些资源等。 加载动画的plist文件、瓦片地图编辑器到处的地图格式tmx文件,实际...

shahdza
2015/02/17
0
0
在C#.net中如何操作XML

在C#.net中如何操作XML 需要添加的命名空间: using System.Xml; 定义几个公共对象: XmlDocument xmldoc ; XmlNode xmlnode ; XmlElement xmlelem ; 1,创建到服务器同名目录下的xml文件: ...

晨曦之光
2012/03/09
89
0
.NET开发不可不知、不可不用的辅助类(一)

1. 用于获取或设置Web.config/*.exe.config中节点数据的辅助类 /// /// 用于获取或设置Web.config/*.exe.config中节点数据的辅助类 /// public sealed class AppConfig { private string fil...

walb呀
2017/12/04
0
0
添加XML记录的方法

今天写代码,添加几条XML记录,总感觉写那几条重复的语句很不爽,就写了这个方法 代码如下: /**/ /* Add XML Method By 孤鸿 */ private void addXmlInfo( string xmlPath, string rootElement...

晨曦之光
2012/05/16
58
0
C#反射实践续

前回在C#反射实践的文章中,只介绍了利用反射如何把Xml文件中的数据读取设定到类对象的属性中的方法,这回来介绍如何利用反射机制把值对象写入Xml文件的方法 本文介绍的把值对象写入Xml文件的...

长平狐
2012/10/16
192
0

没有更多内容

加载失败,请刷新页面

加载更多

web前端开发高级

前端高效开发框架技术与应用 Vue 基础 Vue 框架简介 MVX 模式介绍 Vue 框架概述 如何使用 Vue.js 基础语法 实例对象 生命周期 模板语法 计算属性 Methods 方法 渲染 列表渲染 条件渲染 事件与...

达达前端小酒馆
26分钟前
3
0
PostgreSQL 11.3 locking

rudi
今天
5
0
Mybatis Plus sql注入器

一、继承AbstractMethod /** * @author beth * @data 2019-10-23 20:39 */public class DeleteAllMethod extends AbstractMethod { @Override public MappedStatement injectMap......

一个yuanbeth
今天
20
1
一次写shell脚本的经历记录——特殊字符惹的祸

本文首发于微信公众号“我的小碗汤”,扫码文末二维码即可关注,欢迎一起交流! redis在容器化的过程中,涉及到纵向扩pod实例cpu、内存以及redis实例的maxmemory值,statefulset管理的pod需要...

码农实战
今天
4
0
为什么阿里巴巴Java开发手册中不建议在循环体中使用+进行字符串拼接?

之前在阅读《阿里巴巴Java开发手册》时,发现有一条是关于循环体中字符串拼接的建议,具体内容如下: 那么我们首先来用例子来看看在循环体中用 + 或者用 StringBuilder 进行字符串拼接的效率...

武培轩
今天
9
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部