[TXMLDocument] Problem mit Darstellung in Treeview

[calculon]

Hallo,

ich will eine solch-strukturierte XML-Datei in einer Treeview darstellen:

XML-Code:

   <Group title="Blabla" comment="">
      <Group title="Blablabla" comment="">
         <Document title="Blalba">
            <Source>http://www.blabla.com</Source>
         </Document>
         <Document title="Blablabla">
            <Source>http://www.blabla.com</Source>
         </Document>
         <Document title="Blablabla">
            <Source>http://www.blabla.com</Source>
            <Source>http://www.blablablabla.com</Source>
         </Document>

Das mach' ich rekursiv und es funtioniert auch alles, aber wenn innerhalb eines title-Blocks mehrere <Source> Elemente sind, wird nur der erste genommen. Der Rest wird ignoriert. Ich will aber alle als Nodes darstellen. Hier etwas Quellcode:

Delphi-Quellcode:

  var
    Node : IXMLNode;
    trn: TTreenode;
  begin
    
    [..]

    if Node = nil then Exit;
      // tree ist meine treeview
      trn := tree.Items.AddChild(trn, Node.Attributes['title']); 
      if trim(Node.ChildNodes.Nodes['Source'].Text) <> '' then
        trn := tree.Items.AddChild(trn, Node.ChildNodes.Nodes['Source'].Text);

Kann mir jemand weiterhelfen?

Gruß
--