Delphi and XML CDATA

Question

How can I extract CData from a XML file with Delphi ? this is my XML file:

<?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>

Surely you just read what's inside the – David Heffernan Oct 12 '11 at 08:02 — David Heffernan, Oct 12 '11 at 08:02

score 7 · Accepted Answer · answered Oct 12 '11 at 08:24

With OmniXML you would do:

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;

Delphi and XML CDATA

1 Answers1