TStringList bringt mich zum VerZweiFeln

[mkinzler]

Doch.

Delphi-Quellcode:

  //3 Neue Vokabeln
  begin // weg
    for iI := 1 to 3 do
    begin
      If (Frame_1.LastVokIndex+1) <= Frame_1.OverAllVok then
      begin
        inc(Frame_1.LastVokIndex);
        Frame_1.SVoksToDo.Add(Frame_1.savestring[Frame_1.savestring.IndexOf('NR' + inttostr(Frame_1.LastVokIndex))+7]);
      end;
    end;
  end; //weg

  //5 aus Aktueller Lektion
  begin//weg
    for iI := 1 to ...