string zu Zahlen verschlüsseln und als Integer ausgeben

[Bjoerk]

Könnte auch ein PolyBios gemeint sein? Wenn man z.B. die Zeichen #32..#255 verschlüsseln möchte, kreiert man sich ein String (Chiffre) aus dienen 224 Zeichen, mischt ihn kräftig durch und schreibt ihn als Konstante oder function ins Programm.

Die Verschlüsselungszeichen sind dann einfach die Indices dieses Chiffre als dreistellige Zahl. Die Entschlüsselung sind die Zeichen, die an den Stellen Index im Chiffre stehen.

Beispiel:
Chiffre = '1dX2Üß?a A .. X‘
Text = '1X'
Encrypt = 001224
Decrypt = Chiffre[001] + Chiffre[224]

Da man die Nullen zum Auffüllen benötigt, muß das Chiffre bei Index 1 beginnen was beim String in Delphi ja automatisch so ist.