Variablen während Laufzeit erzeugen?

[quendolineDD]

Nehm die Schleife mal nur bis length(schluessel) -1

Delphi-Quellcode:

repeat
    for i := 0 to length (Schluessel)-1 do // x = Länge des Schlüssels
    begin                                // x = Anzahl der Elemente in List
      List.Strings[i]:= List.Strings[i] + Klartext[zeichen];
      inc (Zeichen);
      inc (z);
    end;
    i := 0;
    until z = length(Klartext);