Delphi и XML CDATA

Question

Как извлечь CData из XML-файла с помощью Delphi?это мой файл XML:

<?xml version="1.0"?>
<root>
  <PartoBeetaXMLVersion value="0.1">
    <VersionID value="111"/>
    <Developer value="1Dev"/>
    <CDate value="10/12/2011"/>
    <Script>
      <![CDATA[
      alter table tblPersonels
      add UID int null, 
          RID int null
    ]]>
    </Script>
  </PartoBeetaXMLVersion>
</root>

Answer 1

С OmniXML вы бы сделали:

uses
  OmniXML,
  OmniXMLUtils;

function GetScriptCData(const fileName: string): string
var
  xml: IXMLDocument;
begin
  Result := '';
  xml := CreateXMLDoc;
  if XMLLoadFromFile(xml, fileName) then
    Result := GetNodeCData(xml.SelectSingleNode('/root/PartoBeetaXMLVersion/Script'));
end;