敬业的IT人 >> 编程开发 >> Delphi >> 简单分析TXMLDocument内部结构

简单分析TXMLDocument内部结构

敬业的IT人 互联网 佚名 2008-1-4 16:03:52
第一次对TXMLDocument感兴趣,也是第一次使用TXMLDocument的时候,当时,我在修改一个软件,只是想加一点功能,由于时间不多,我决定先做一个接口,再慢慢扩充,但如何使接口扩充性能好,能与各种工具混合,于是我想到了java用XML做配置的方法,语法很多想法来自C++,架构多来自java(上面哪部分想法也是抄自Java,哈哈),实现当然是用Delphi了,于是写了一个配置文件,发现TXMLDocument怎样也没法把数据读出来,检查了一天XML文件,未果,最后改了一下DOMVendor属性,改成OpenXML竟然通过了。现在我决定重走我的旧迹,以DOMVendor做切入点,开始简单分析一下TXMLDocument,正确选择切入点很重要,要不会浪费很多时间,有时这真要靠点运气. 当点DOMVendor属性,它像是一个枚举属性,但在TXMLDocument定义为类TDOMVendor;这时候当然是想到要找DefineProperties,从DefineProperties追到 ReadDOMVendor,终于找到真正的入口GetDOMVendor(DOMVendorDesc). 下面正式介绍它的结构。 TXMLDocument内部分为两层,一层是IDOM*****,一层是IXML******,IXML是供用户使用的接口,IDOM***应该是以DOM做为模型定义的接口,供IXML使用,IDOM下面有各种具体实现手段,这是一个典型的Bridge模式,我把图画出来,大家可以与(<设计模式> GoF 中文版)101页哪个图对照一下。当我们使用IXML***接口时,它将会使用IDOM去完成操作。在这里IDOMDocument是继承IDOMNode的,但IXMLDocument却没有,似乎也不太必要,因为内部主要使用IDOM接口,如果要IDOMNode,可以用IDOMDocument去转换,其实根本用不到。这么多实现,到底要怎样才能准确并且优美地创建对应的实例,在TXMLDocument内部使用了Abstract Factory模式,参照下图Abstract Factory希望不用指定具体的类,但为了找到它们,在TXMLDocument是通过指定一个字符串,也就是我们点击DOMVendor时出现的哪几个字符串.现在回到开始,再来看看切入点DOMVendor := GetDOMVendor(DOMVendorDesc);最后取得一个IDOMImplementation,它有一个createDocument(….):IDOMDocument;函数,这个函数将返回一个IDOMDocument;接口让IXMLDoucment使用。在如果使用MSXML,接口对应的是TMSDOMDocument,TMSDOMDocument是实际上是调用MSXML技术,下面是调用MS COM的代码function CreateDOMDocument: IXMLDOMDocument;begin Result := TryObjectCreate([CLASS_DOMDocument40, CLASS_DOMDocument30, CLASS_DOMDocument26, msxml.CLASS_DOMDocument]) as IXMLDOMDocument; if not Assigned(Result) then raise DOMException.Create(SMSDOMNotInstalled);end; CLASS_DOMDocument26: TGUID = '{F5078F1B-C551-11D3-89B9-0000F81FE221}'; CLASS_DOMDocument30: TGUID = '{F5078F32-C551-11D3-89B9-0000F81FE221}'; CLASS_DOMDocument40: TGUID = '{88D969C0-F192-11D4-A65F-0040963251E5}';而OpenXML却使用了另一种方法它不知怎样又搞出一个TDomImplementation,里面又有一个createDocument,总之哪里代码多多,没精力看了。还有哪个TXercesDOMImplementationFactory,好像是Linux下用了,却代码少少,一眼看完 InitLibrary; GetDOMProc := GetProcAddress(FLibHandle, SGetDOMImpl); GetDOMProc(Result);跑到动态连接库中去了,省得我浪费时间。
粤ICP备06119539号
Copyright CiscoSky.Org,Some Rights Reserved.
Email:me1228#tom.com