AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein XML Delphi XML geschachteltes selectNodes liefert falsches Ergebnis zurück
Thema durchsuchen
Ansicht
Themen-Optionen

XML geschachteltes selectNodes liefert falsches Ergebnis zurück

Ein Thema von news2swen · begonnen am 28. Mär 2017 · letzter Beitrag vom 5. Aug 2019
 
news2swen

Registriert seit: 7. Nov 2008
36 Beiträge
 
Delphi XE4 Enterprise
 
#1

XML geschachteltes selectNodes liefert falsches Ergebnis zurück

  Alt 28. Mär 2017, 08:23
Hallo zusammen

irgendwie komme ich nicht weiter und weiß nicht, wo mein Fehler liegt.
Ich habe eine XML-Datei:
Code:
<?xml version="1.0" encoding="utf-8"?>
<STL date="2017-02-24">
   <Ebene0 id="id4" primaryRef="id7">
      <Ebene1 id="id7">
         <Ebene2 id="id6">
            <Ebene3 title="A" value="0815"/>
            <Ebene3 title="B" value="747"/>
         </Ebene2>
         <Ebene2 id="id8" type="ADD">
            <Ebene3 title="NO" value="-"/>
            <Ebene3 title="AM" value="-"/>
         </Ebene2>
      </Ebene1>
      <Ebene1 id="id11" parentRef="id7">
         <Ebene2 id="id10">
            <Ebene3 title="A" value="0819"/>
            <Ebene3 title="B" value="A.001"/>
         </Ebene2>
         <Ebene2 id="id12" type="ADD">
            <Ebene3 title="NO" value="25"/>
            <Ebene3 title="AM" value="40"/>
         </Ebene2>
      </Ebene1>
      <Ebene1 id="id71" parentRef="id8">
         <Ebene2 id="id78">
            <Ebene3 title="A" value="0816"/>
            <Ebene3 title="B" value="A.001"/>
         </Ebene2>
         <Ebene2 id="id79" type="ADD">
            <Ebene3 title="NO" value="8825"/>
            <Ebene3 title="AM" value="4054"/>
         </Ebene2>
      </Ebene1>
      <Ebene1 id="id81" parentRef="id7">
         <Ebene2 id="id89">
            <Ebene3 title="A" value="0817"/>
            <Ebene3 title="B" value="A.005"/>
         </Ebene2>
         <Ebene2 id="id99" type="ADD">
            <Ebene3 title="NO" value="2"/>
            <Ebene3 title="AM" value="4"/>
         </Ebene2>
      </Ebene1>
      <Ebene1 id="id99" parentRef="id7">
         <Ebene2 id="id100">
            <Ebene3 title="A" value="0818"/>
            <Ebene3 title="B" value="A.002"/>
         </Ebene2>
         <Ebene2 id="id112" type="ADD">
            <Ebene3 title="NO" value="125"/>
            <Ebene3 title="AM" value="140"/>
         </Ebene2>
      </Ebene1>
   </Ebene0>
</STL>
Aus dieser hole ich mir mittels node.selectNodes('//Ebene1[@parentRef='id7']) alle Knoten der Ebene1, welche mich interessieren in eine Nodelist.
Nun möchte ich für jeden einzelnen Knoten dieser Liste bestimmte Attribute der Ebene3 abfragen. Wenn ich dies mit selectSingleNode('//Ebene2/Ebene3[@title=''A'']') versuche, erhalte ich für alle selektierten Knoten (in dem Falle 3) immer den gleichen Wert zurück. Das ist schon verwirrend genug, aber ganz mysteriös ist, dass der zurückgelieferte Knoten gar nicht Teil der in Nodelist befindlichen Elemente ist, sondern der erste in der XML vorkommende.

Hier mein code mit dem ich das versuche:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  XMLDoc: DOMDocument;
  Node,subnode1: IXMLDOMNode;
  nodelist: IXMLDOMNodeList;

  sPrimary : string;
  i : integer;
begin
    Memo1.Clear;
    XMLDoc := CoDOMDocument.Create;

    xmlDoc.Load('C:\Temp\test.xml');
    // Knoten auswählen
    Node:= XMLDoc.selectSingleNode('/STL/Ebene0') as IXMLDOMElement;

    if Assigned(Node) then
    begin
        // ermitteln der ID, um die entsprechenden Unterknoten zu selektieren
        sPrimary := Node.attributes.getNamedItem('primaryRef').text;
        nodelist := node.selectNodes('//Ebene1[@parentRef=''' + sPrimary + ''']');

        // für alle Knoten, welche diese ID in parentRef haben, die Daten
        // der Ebene3 mit entsprechendem Attribut ermitteln
        for i := 0 to nodelist.length-1 do
        begin
            subnode1:= nodelist.item[i].selectSingleNode('//Ebene2/Ebene3[@title=''A'']');
            memo1.Lines.Add(subnode1.attributes.getNamedItem('value').text);
            subnode1:= nodelist.item[i].selectSingleNode('//Ebene2/Ebene3[@title=''NO'']');
            memo1.Lines.Add(subnode1.attributes.getNamedItem('value').text);
        end;
    end;

end;
Wo liegt mein Fehler? Ich hoffe ihr habt eine Idee

VG
Swen
Angehängte Dateien
Dateityp: xml test.xml (1,5 KB, 2x aufgerufen)
Swen
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:28 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz