Verschlüsselungstool

[pronoob1]

Hallo,

Ich hab so ein ähnliches Problem und dachte, dass es vielleicht reichen würde, wenn ich bei der Zeile:

normedKey := Ord(AKey) - Ord('A') + 1;

einfach

normedKey := Ord(AKey) - Ord('A') +StrToInt(edit1.text);

mache, aber da tritt dann ein Fehler auf, weil edit1 ein undefinierter Bezeichner ist ?!