mach mal aus dem s : string[255]; ein string.
Nein.
Man beachte das absolute.
Wenn, dann muß man noch mehr umbauen.
Problem ist hier, dass seit Delphi 2009 der String
Unicode ist,
aber der Typ String[x] blieb weiterhin
ANSI.
Auch bei der Ver-/Entschlüsselung von Zeichen über #127 (kein
ASCII) kommt eventuell was Falsches raus, wenn man es einfach so auf
Unicode umstellt. (2 Byte statt 1 Byte)
Delphi-Quellcode:
s := AnsiString(Edit4.Text);
for i := 1 to Length(s) do s[i] := AnsiChar(23 xor Ord(c[i])