nocheinmal XML

[theomega]

hallo

ich haben folgende XML-Datei:

Code:

<?xml version="1.0" encoding="ISO-8859-1"?>
<xml>
<term>
   <string>xh2</string>
   <from>-10</from>
   <to>10</to>
   <color>ABC</color>
</term>

<term>
   <string>xh3</string>
   <from>-5</from>
   <to>5</to>
   <color>CBA</color>
</term>

</xml>

jetzt möchte ich die in einen Listview laden. Aber schon der einfache Befehl

Code:

showmessage(xmldoc.DocumentElement.NodeName);

der ja eingetlich zur Ausgabe "xml" führen sollte, schlägt mit einem Ausnahmefehler fehl.

hier einmal die ganze Funktion:

Code:

procedure loadterms(listview:TListview;path:string);
var xmldoc: TXMLDocument;
begin;
xmldoc :=  TXMLDocument.Create(path);
xmldoc.LoadFromFile(path);
xmldoc.Active := true;
showmessage(xmldoc.DocumentElement.NodeName);
end;

mit path wird der Dateiname übergeben, der aber garantiert stimmt!

Wer hat mir eine Lösung?

Danke

TO