Einzelnen Beitrag anzeigen

zsoerenm

Registriert seit: 13. Mai 2007
2 Beiträge
 
Delphi 7 Enterprise
 
#1

unbekannte Knoten auslesen

  Alt 13. Mai 2007, 12:21
Hallo

Ich bin noch ein Anfänger im bereich des Programmierens.

Ich hab mir das Tutorial von Christopher Harms zu MSXML durchgelesen.
In seinem Beispiel zum auslesen eines XML Dokuments schreibt er dies:

Delphi-Quellcode:
procedure TMainForm.UpdateList;
const
NAMES: array[0..8] of string = ('name', 'format', 'ton', 'anzmedien',
'bildqualitaet', 'tonqualitaet', 'gesamt',
'verliehen', 'comment'); // siehe I
var
movies: IXMLDOMNodeList; // wird alle Filme (die Pakete) enthalten
subNode: IXMLDOMNode; // enthält eine Node
i, j: integer; // Laufvariablen
begin
MovieList.Items.Clear; // leeren der MovieList
MovieList.Items.BeginUpdate;
movies := xmlDoc.documentElement.selectNodes('movie'); // siehe II
for i:=0 to movies.length – 1 do begin
subNode := movies.item[i].selectSingleNode('id'); // siehe III
MovieList.Items.Add;
MovieList.Items[i].Caption := subNode.Text; // siehe IV
with MovieList.Items[i].SubItems do begin
for j:=0 to length(NAMES)-1 do begin // siehe V
subNode := movies.item[i].selectSingleNode(NAMES[j]); // -"- -"-
if subNode <> nil then // siehe VI
Add(subNode.Text) // -"- -"-
else
Add('');
end;
end;
end;
MovieList.Items.EndUpdate;
end;
In dem Array NAMES schreibt er alle namen der Knoten rein.
Mein Problem ist, dass ich die aber nicht kenne, da es bei meinem xml dokument verschieden viele Knoten sein können.
Kann man irgendwie auslesen wieviel Knoten vorhanden sind und welche Namen die haben?

Hoffe ihr versteht mich.
Gruß Sören
  Mit Zitat antworten Zitat