Löschen aus der StringList verursacht Fehler, wieso?

[Luckie]

Eben nicht. Das ist ja das Problem.

[Popov]

Erklärung?

[Luckie]

Die haben wir beide doch schon geliefert.

[Perlsau]

Ich glaube, das Mißverständnis besteht darin, daß Luckie mit seinem "Eben nicht" auf das Posting von AlexII geantwortet hat und nicht auf das von Popov. Passiert manchmal, wenn einer "zwischenrein" postet

Dieses Beispiel funktioniert korrekt (eben schnell in CodeTyphon getippt und getestet):

Delphi-Quellcode:

procedure TFormMain.Button2Click(Sender: TObject);
Var
  Liste : TStringList;
  i     : Integer;
begin
  Liste := TStringList.Create;

  Try
    For i := 1 To 10 Do
        Liste.Append('Eintrag ' + IntToStr(i));
    ShowMessage('Listen-Zahl = ' + IntToStr(Liste.Count));
    For i := Liste.Count -1 DownTo 0 Do
        Liste.Delete(i);
  Finally
    ShowMessage('Listen-Zahl = ' + IntToStr(Liste.Count));
    Liste.Free;
  End;
end;

[Popov]

Das "Eben nicht" hat mich irritiert. Weiß nicht auf welchen Post es bezogen ist.

[AlexII]

Man, man, voll easy... muss nur bisschen nachdenken... und selber solche Problemchen lösen. Vielen Dank euch!

[Perlsau]

Ich denk mal, wenn du dranbleibst und dich regelmäßig mit Delphi bzw. Lazarus oder CodeTyphon (erweiterte Lazarus-IDE, aus meiner Sicht sehr zu empfehlen) befaßt, wird das schon. Das geht dir mit der Zeit quasi in Fleisch & Blut über und du träumst dann vielleicht sogar davon

[Popov]

Zitat von AlexII:

Man, man, voll easy... muss nur bisschen nachdenken... und selber solche Problemchen lösen. Vielen Dank euch!

Tröste dich. Auch wenn ich mich hier etwas aus dem Fenster lehne, so behaupte ich mal, dass das Vorwärts-Löschen von Items in der For-Schleife ein Fehler-Klassiker ist und irgendwann jedem passiert ist.