TJvSimpleXML - Löschen funktioniert nicht

[Yheeky]

Hi,

ich habe 11 Einträge in meiner TJvSimpleXML Komponente. Wenn ich nun über die folgende Funktion versuche, die Einträge zu löschen, bleiben immer 5 Einträge übrig. Wenn ich es nochmal probiere bleiben wiederum 2 übrig. Wieso werden nicht alle Einträge gelöscht?

Hier die Funktion:

Delphi-Quellcode:

var
  I: Integer;
begin
for I := 1 to JvSimpleXML1.Root.Items.Count - 1 do
JvSimpleXML1.Root.Items.Delete(I);