Visio-XML mit Mischung aus Textknoten und ChildNodes

[Der schöne Günther]

Gibt es kein Schema/DTD zum XML von Visio? Spontan hätte ich es wie folgt gemacht:

Delphi-Quellcode:

procedure justXmlThings();
const
   content: String =
      '<Text>' + sLineBreak +
      '   <cp IX=''0''/>' + sLineBreak +
      '   <pp IX=''0''/>' + sLineBreak +
      '   Gesuchter Text' + sLineBreak +
      '</Text>';
var
   xmlDoc:      IXMLDocument;
   xmlNode:   IXMLNode;
begin
   xmlDoc := LoadXMLData(content);
   xmlNode := xmlDoc.DocumentElement;

   if (xmlNode.ChildNodes.Count > 0) then
      ShowMessage(xmlNode.ChildNodes.Last.Text);
end;