|
Registriert seit: 6. Dez 2005
999 Beiträge
|
Re: Vigenere macht Macken ;)
7. Feb 2010, 20:36
In TForm1.BugeheimClick: keypos := i mod laenge wird 0, wenn i >= laenge. Die untere Grenze von keynum: array[1..20] of integer; ist 1. Wenn keypos=0 ist, gibt es (wenn Du mit Rangecheck arbeitest einen Fehler) oder Unsinn (wenn nicht). Auf jeden Fall ändern: Entweder untere Grenze = 0 oder keypos := 1 + i mod laenge
|