Auslesen von Werten in einer XML

[keine_ahnung]

Hallo,
da bin ich wieder und ich hab mich damit etwas näher damit auseinander gesetzt.
Zuerst einmal herzlichen Dank für die Hilfe.

hab das hauseigene XMLDocument benutzt. Im ganzen macht es das was ich eigenltich möchte, nur kommt eine Fehlermeldung "Variante des Typ(Null) konnte nicht in Typ (String)konvertiert werden"
Könnte mir bitte jemand behilflich sein und mir sagen, wo der Fehler versteckt ist?
Ich hab eine Vermutung, wenn die Datei durchsucht wurde und keine lon bzw lat mehr da ist bringt er eine Fehlermeldung ist das so korrekt?

Code:

procedure TForm1.Button3Click(Sender: TObject);
var i : Word;
begin
  XMLDocument2.Active:= true;
  for i := 0 to XMLDocument2.DocumentElement.ChildNodes['Destination'].ChildNodes.Count -1 do
    Begin
      Listbox1.Items.Add(XMLDocument2.DocumentElement.ChildNodes[i].Attributes['lon']);
      Listbox2.Items.Add(XMLDocument2.DocumentElement.ChildNodes[i].Attributes['lat']);
    end;
end;

und hier die verwendete GPX bzw XML datei

Code:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<gpx>
    <wpt lon="9.3438720703125" lat="48.90444878143716">
        <ele>148.0</ele>
        <time>2011-01-02T14:23:31.234Z</time>
        <name>NeuePosition 1</name>
    </wpt>
    <wpt lon="8.909912109375" lat="49.005447494058096">
        <ele>313.0</ele>
        <time>2011-01-02T14:24:51.187Z</time>
        <name>NeuePosition 2</name>
    </wpt>
    <wpt lon="8.778076171875" lat="48.72358515157852">
        <ele>313.0</ele>
        <time>2011-01-02T14:24:51.187Z</time>
        <name>NeuePosition 3</name>
    </wpt>
</gpx>