Listindex überschreitet Maximum - Einmal ja, einmal nein?

[draGo]

Huhu DP,

ich stehe mal wieder vor einem (komischen) Problem...
Ich habe hier vor einiger Zeit mal eine Split Funktion gefunden die auch ganz das tut was sie soll. (Gibt eine StringList zurück).
Um die Stringlist bearbeiten zu können habe ich mir noch eine eigene erstellt und folgendes gemacht:

StringLst := Split(Str,'|',false,false); Nun habe ich mit

Delphi-Quellcode:

    Stringlst.Text := Stringreplace(Ergebnisse.Text,' ','',[rfreplaceall]);
 stringlst.Text := Stringreplace(Ergebnisse.Text,'#',' ',[rfreplaceall]);

etwas ersetzt. Alles schön und gut.
Wenn ich jetzt aber mit einer Schleife arbeiten möchte kommt das Problem...

Delphi-Quellcode:

for I := 0 to StringLst.Count -1  do begin
  //...

Es erfolgt der Fehler "Listindex überschreitet Maximum"
Wenn ich es folgend mache

Delphi-Quellcode:

for I := 0 to Split(Str,'|',false,false).count -1 do begin
  //...

funktioniert alles wunderbar.
Wenn ich das ersetzen auslasse funktioniert es... Nur warum?
Ich würde nämlich gerne mit meiner StringList arbeiten
Hoffe ihr könnt mir helfen

mfg,
draGo