Delphi 操作xml文件入門資料

<script src="http://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"> </script><iframe name="google_ads_frame" marginwidth="0" marginheight="0" src="http://pagead2.googlesyndication.com/pagead/ads?client=ca-pub-3528650120430763&dt=1183799909421&lmt=1183799909&format=468x60_as&output=html&correlator=1183799909421&url=http%3A%2F%2Fpages.google.com%2Fdraft%2FGmai9999%2Fhome%3Fauthtoken%3D397572419ac6db50f5ab16961d0b13491bee0967&ad_type=text_image&ref=http%3A%2F%2Fpages.google.com%2Fpreview%2FGmai9999%2Fhome%3Fauthtoken%3D9686509b5e94c7e953ceecc7a041fbc446802a9a%26no-cache%3D15040874706351293&ui=rc%3A0&flash=9&u_h=768&u_w=1024&u_ah=738&u_aw=1024&u_cd=32&u_tz=480&u_java=true" frameborder="0" width="468" scrolling="no" height="60" allowtransparency="allowtransparency"></iframe> 
Delphi 對XML的支持---TXMLDocument類

       Delphi7 支持對XML文檔的操作，可以通過TXMLDocument類來實現對XML文檔的讀寫。可以利用TXMLDocument把XML文檔讀到內存中，從而可以進行編輯、保存操作。TXMLDocument類是通過DOM(文檔對象模型)接口來訪問XML文檔中的各個元素的。對於DOM接口的實現有多種方式，Delphi支持的方式有：1)微軟的MSXML SDK，這種方式是通過COM對象來實現；2) Apache 的Xerces的實現方式；3)另外一種是開源OpenXML實現方式。對於不同的接口實現方式可以通過設定TXMLDocument的DOMVender來進行控制。

       支持XML的Delphi單元主要存在與…/Borland/Delphi7/Source/Xml目錄下，主要包括：XMLIntf，XMLDoc，xmldom，msxmldom，xercesxmldom，xdom，oxmldom等單元。


l         XMLIntf――包括了Borland自己定義的XML文檔的接口；

l         XMLDoc――是對XMLIntf中所定義接口的Borland實現；

l         Xmldom――定義了DOM（文檔對象模型）接口，這裏對DOM接口進行了Borland的實現；

l         Msxmldom――實現微軟對Xmldom中定義的接口的實現，主要調用微軟的COM對象來實現，對Xmldom中定義接口的封裝；

l         Xercesxmldom――Borland通過Xerces XML DOM方式來實現對Xmldom中定義接口的封裝；

l         Oxmldom――Borland通過使用OpenXML來實現對Xmldom中定義接口的封裝；

TXMLDocument類的屬性，請參考Borland的幫助文件；


讀寫XML文檔
l         讀取XML文檔

通常情況下不通過直接使用TXMLDocument對象來進行XML文件的讀取，而是使用XMLDoc單元中提供的幾個有用的函數來讀取XML文檔，這些函數包括：

function LoadXMLDocument(const FileName: DOMString): IXMLDocument;

function LoadXMLData(const XMLData: DOMString): IXMLDocument; overload;

function LoadXMLData(const XMLData: string): IXMLDocument; overload;

function NewXMLDocument(Version: DOMString = '1.0'): IXMLDocument;

可以看出這些函數全部返回的是IXMLDocument接口，得到了IXMLDocument接口在進行文檔的操作；

這些函數都是通過創建TXMLDocument對象來實現對XML文檔的讀取的；其中NewXMLDocument僅僅創建一個IXMLDocument接口。

可以這樣利用NewXMLDocument來讀取XML文檔：

    XMLDoc := NewXMLDocument;

XMLDoc.LoadFromFile(FileName);


l         保存XML文檔

可以通過下面的方式來保存XML文檔：


           XMLDoc := NewXMLDocument;

           iRoot := IXMLDoc.CreateNode(‘TestXMLDocument’);

           XMLDoc.DocumentElement := iRoot;

           …

           XMLDoc.SaveToFile(FileName);
       

       可以看出通過接口來操作XML文檔是非常方便的；


選用不同類型的XML解析方式
       上面已經提到有三種方式實現DOM，也就是可以應用Borland提供的３種不同的XML解析器來對XML文檔進行解析；

l         三種解析器

１、微軟的解析器（MSXML SDK）

微軟解析器主要應用在Windows中，在安裝MSXML SDK的時候會安裝解析器，同時IE瀏覽器也提供瞭解析器，這個解析器是一個COM。

２、Apache的Xerces解析器

Borland自己實現了一個Xerces解析器，這個可以通過調用xercesxmldom.dll模塊來實現；如果使用這個解析器可能需要同應用程序一起進行分發xercesxmldom.dll，XercesLib.dll，CC3260MT.DLL三個DLL文件

３、OpenXML解析器

這個解析器的源代碼存在於xdom.pas單元中，這個可以通過http://www.philo.de/xml/進行跟新下載，這個是一個德國人寫的XML解析器；

l         使用不同解析器的比較

對於三種方式的解析器比較如下：

１、微軟的解析器

微軟的解析器當然好了，但是也不能排除存在的意外情況，在我個人的經驗中，至少我們公司對於XML解析的方式，只有在IE6.0以上的版本才能夠正常的工作；

至於，Borland同樣是通過引入MSXML.DLL的接口來實現的，所以可以推理出，同樣存在同樣的問題；這個通過研究TMSDOMImplementation(msxmldom單元中)的實現方式可以得到證明，實現的過程中通過調用CoCreateInstance函數接口來實現解析的；

在發佈解析XML的代碼的時候可能就會存在由於IE的本版的不同，需要把IE6.0一同發佈，比較麻煩；

２、Borland的Xerces解析器

這種方式的解析器是通過　LoadLibrary(PChar(LibName));函數，LibName的內容是xercesxmldom.dll（Windows平臺），libxercesxmldom.so.1（Linux平臺）。那麼就需要隨同應用程序一起發佈的Dll,就包括了xercesxmldom.dll，XercesLib.dll，CC3260MT.DLL；

這個發佈相對於發佈不同版本的IE6.0來說要相對簡單一些；

３、OpenXML解析器

由於存在xdom.pas單元，這個單元中包含了完全的XML解析的源代碼，那麼應用這種方式，可以避免軟件發佈的種種問題，這是由於解析的代碼被靜態編譯在應用程序內部。唯一不好的地方就是應用程序的體積可能要大一些；

 
l         如何使用不同的解析器

我們可以寫一個函數來使用不同的解析器；

function NewDiffXmlDocument(DOMVender: string;

  Version: DOMString = '1.0'): IXMLDocument;

var

  XMLDoc : TXMLDocument;

begin

  XMLDoc := TXMLDocument.Create(nil);

  XMLDoc.DOMVendor := GetDOMVendor(DOMVender);

  Result := XMLDoc;

  Result.Active := True;

  if Version <> '' then

    Result.Version := Version;

end;


其中DOMVender如果用Borland提供的三種方式進行解析的話，分別取值是：

       Microsoft――存在於msxmldom.pas單元中的SMSXML常量；

       Xerces――存在於xercesxmldom .pas單元中的SXercesXML常量；

       OpenXML――存在於oxmldom.pas單元中的SOpenXML常量；


這個是由於在msxmldom，xercesxmldom，oxmldom三個單元的initailization部分，都通過調用RegisterDOMVendor函數，註冊了不同的解析器接口；

當然，Borland同樣提供了一種可以靈活進行擴展的機制來擴展用戶自己的解析器，這個需要繼承，TDOMVendor類(存在於xmldom單元中)。實際上，Borland自己就是通過這種方式來實現不同方式解析器的；具體的實現過程可以通過參考oxmldom單元中對xdom的封裝；


結論
       Delphi作爲一個成功的開發工具，它自身實現的對XML的支持，肯定比網絡上某些實現要穩定、高效的多，我們沒有必要再進行另外的封裝什麼MSXML.DLL的COM接口。當然，可以自己實現不同的XML解析器，也可以應用已經存在的解析器。同時，可以看出Delphi對於XML的支持也是非常完善的。 

<script src="http://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"> </script><iframe name="google_ads_frame" marginwidth="0" marginheight="0" src="http://pagead2.googlesyndication.com/pagead/ads?client=ca-pub-3528650120430763&dt=1183799909421&lmt=1183799909&format=468x60_as&output=html&correlator=1183799909421&url=http%3A%2F%2Fpages.google.com%2Fdraft%2FGmai9999%2Fhome%3Fauthtoken%3D397572419ac6db50f5ab16961d0b13491bee0967&ad_type=text_image&ref=http%3A%2F%2Fpages.google.com%2Fpreview%2FGmai9999%2Fhome%3Fauthtoken%3D9686509b5e94c7e953ceecc7a041fbc446802a9a%26no-cache%3D15040874706351293&ui=rc%3A0&flash=9&u_h=768&u_w=1024&u_ah=738&u_aw=1024&u_cd=32&u_tz=480&u_java=true" frameborder="0" width="468" scrolling="no" height="60" allowtransparency="allowtransparency"></iframe>