Ich bekomme eine Fehlermeldung, dass das Maximum überschritten wird
Delphi-Quellcode:
repeat
for i := 0 to length (Schluessel) 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);
Habe ich einen Fehler gemacht?
