Einzelnen Beitrag anzeigen

tekkyeah

Registriert seit: 24. Nov 2003
27 Beiträge
 
Delphi 2006 Professional
 
#1

Verschachtelung korrekt auslesen

  Alt 24. Nov 2003, 22:08
Hallo zusammen, ich habe eine XML Datei mit nachfolgendem (verkürzt dargestellten) Aufbau. Diese möchte ich gerne einlesen... Prinzipiell besteht meine Datei aus "ordersätzen", die den Kunden beinhalten und dann die von ihm bestellten Produkte.

XML-Code:
<orders_all>
- <orders>
  <customers_name>tekkyeah</customers_name>
  <customers_company />
  <customers_city>Bremen</customers_city>
  ...
  - <products>
    <orders_id>27</orders_id>
    <products_id>3407</products_id>
    <products_model>RC 80X120M/I</products_model>
    </products>
  - <products>
    <orders_id>27</orders_id>
    <products_id>209</products_id>
    <products_model>ANT 20X30M</products_model>
    </products>
  </orders>
</orders_all>
Ich habe mir die tlb in mein Delphi 5 Professional importiert und kann auf die XML-Datei zugreifen... die Kundeninformationen kann ich einlesen, aber wie bekomme ich die nächste Ebene eingelesen mit "products" ? Genauer gefragt... an welcher Stelle lese ich die die nodes für die "products" ein, analog der Zeile

"orders := xmlDoc.documentElement.selectNodes('orders');"

Auszug aus meinem Code...


Delphi-Quellcode:
  
  xmlDoc := CoDOMDocument30.Create;
  (...)

  orders := xmlDoc.documentElement.selectNodes('orders');
  for i:=0 to orders.length - 1 do
  begin
    try
      subNode := orders.item[i].selectSingleNode('customers_name');
      (...)
    except
    end;
    try
      subNode := orders.item[i].selectSingleNode('customers_company');
      (...)
    except
    end;
    try
      subNode := orders.item[i].selectSingleNode('customers_city');
      (...)
    except
    end;
    products := xmlDoc.documentElement.selectNodes('products');
    for j:=0 to products.length - 1 do
    begin
      try
        subNode := products.item[j].selectSingleNode('orders_id');
      except
      end;
      try
        subNode := products.item[j].selectSingleNode('products_id');
      except
      end;
      try
        subNode := products.item[j].selectSingleNode('products_model');
      except
      end;
    end;
    (...)
Ich hoffe, mein Problem ist klar geworden... sicher ganz leicht zu lösen... nur ich komme nicht drauf... theoretisch könnte es ja noch weitergehende VErschachtelungen im Document geben, also ist meine primäre Frage: Wie greife ich auf unterliegende Ebenen zu...

Hoffe auch eine tolle Antwort...

Gruß
Holger
Holger
  Mit Zitat antworten Zitat