Text in bestimmte Zahlen umwandeln

[Lefko]

naja, mir würde da ne case-abfrage einfallen:

Delphi-Quellcode:

case Ord({Buchstabe}) of

65,66,67: result := 2;

68,69,70: result := 3;
...
...
...

end;

Ist sicherlich brauchbar!

MfG Lefko.