Zitat von
Phistev:
Statt array[1..26] würde ich array['a'..'z'] verwenden, dass macht das ord überflüssig
Zitat von
Matze:
Nur möchte er ja
nicht
1 = A
2 = B
So meinte er das denke ich auch nicht, aber aus
Return := Return + IntToStr(myArray[Ord(Input[i]) - 32 - 64]);
würde dann das schönere
Return := Return + IntToStr(myArray[Input[i]]);
// edit:
Vorher müsste man natürlich noch in Kleinbuchstaben umwandeln, ich glaube die Funktion heißt LowerCase, aber bin mir da jetzt nicht ganz sicher.