Umwandlung String in Zahl

[huefte]

Hallo

Ich hab ne Frage. Wollte wissen, ob es ne einfach Möglichkeit gibt, Buchstaben in Zahlen umzuwandeln?
Und zwar will ich, dass BEISPIELSWEISE das Wort "Hallo" in "45661" umgewandelt wird! Gibt es dazu ne einfache Möglichkeit?

Liebe Grüße
Pascal

[Matze]

Hi, nach welchem Schema soll die Zahl denn Aufgebaut werden?

[MisterNiceGuy]

Wäre "Hallo" 81121216 wäre das bestimmt einfacher zu machen

[huefte]

Also eigentlich will ich, dass jeder Buchstaben des Alphabets durch zwei Zaheln ersetzt wird. Mit einstelligen Zahlen geht das schlecht, weil es ja insgesamt 26 Buchstaben gibt.
Ich will sozusagen ein Wort in Zahlen verschlüsseln. Im Programm, das ich geschrieben habe, werden nur die Buchstaben verschobn. Jetzt wärs halt noch gut, wenn die Buchstaben in Zahlen umgewandelt werden.

Also
"W" --> 76
"E" --> 33
"I" --> 34
"H" --> 13
"N" --> 29
"A" --> 89
"C" --> 76
"H" --> 13
"T" --> 46
"E" --> 33
"N" --> 29

Das Wort "WEIHNACHTEN" würde - rein zahlenmäßig - verschlüsselt also so aussehen:

7633341329897613463329

[kill -9]

Hi!
Also, eine einfache Funktion um Zeichen eines Strings zu codieren gibt es meines Wissens nach nicht. Viel eher musst du mit einer Schleife manuell die einzelnen Buchstaben konvertieren.

[Matze]

Ich würde es so ähnlich lösen, ist jedoch nicht sonderlich performant):

Delphi-Quellcode:

var
  Form1: TForm1;
  myArray: array[1..26] of integer = (23, 54, 64, 12, 57, 78, 23, 21, 76, 68 ...;

implementation

{$R *.dfm}

function MakeChaos(Input: string): string;
var
  i: integer;
  Return: string;
begin
  Return := '';
  for i := 1 to Length(Input) do
  begin
    Return := Return + IntToStr(myArray[Ord(Input[i]) - 32 - 64]);
  end;
  Result := Return;
end;

;

[Phistev]

Statt array[1..26] würde ich array['a'..'z'] verwenden, dass macht das ord überflüssig

[Matze]

Nur möchte er ja nicht

1 = A
2 = B

[huefte]

Also das ist doch schon mal was. Kann jetzt ja mal rumbasteln! Wenn ich - bestimmt wieder - probleme habe, meld ich mich wieder.
Trotzdem danke im vorraus

[huefte]

Also das klappt alles wunderbar!
Jetzt hab ich aber noch was. Wie würde denn dann die Umkehrfunktion aussehen? Die brauch ich ja, ums wieder zu entschlüsseln!

EDIT:
Was passiert wenn ich "hallo du" eingeben?
Also ich meine, das Leerzeichen wird zu "0", aber wie bekomm ich leerzeichen zb. als "99" ausgegeben?