简单分析TXMLDocument内部结构

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