Levelrotation.xml auslesbar?

[redeyes330]

Ich bin jetzt schon ein Stück weiter(Für meine Verhältnisse xD)
Aber nun habe ich das Problem das ich die Levelrotation zuerst in ein Memo reinlade und dann alle Elemente Namens level durchsuche in einer schleife. Da aber nur in jeder5ten Zeile eine Map steht wollte ich die Zeilen der Levelrotation durch 5 teilen oder halt mit 0.2 malnehmen.

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
var
  FDoc: TDomDocument;
  i: Integer;
begin
  memo2.Lines.Clear;
  memo2.Lines.LoadFromFile('levelrotation.xml');
  FDoc := XMLToDomParser1.ParseFile('levelrotation.xml', False);

  for i := 0 to Pred(Memo2.Lines.Count)-3 do //<--hier sollte sowas wie Pred(Memo2.Lines.Count)-3*0.2 do
  memo1.Lines.Add(FDoc.GetElementsByTagName('level').Item(i).Attributes.GetNamedItem('name').NodeValue);

end;

Ach ja da in der Levelrotation noch 2 Zeilen mehr sind immer habe ich statt -1 -3 genommen.Aber weiter komme ich nicht. Wenn ich für eine Levelrotation die Zeilen ausreche und in dem Fall -18 mache geht das. Aber es können ja mal 3 maps also 15 Zeilen+2die immer da sind, aber auch mal 5 maps also 25 Zeilen+2 die immer da sind.
Ich habe schon gesucht aber nichts passendes gefunden