Hast Du es einmal mit
StringReplace versucht? Ich mag kaum glauben, dass Delphi kein 'ß' erkennen soll, es sei denn, Du verwendest einen merkwürdigen Zeichensatz.
P.S.: Willkommen in der
DP 
[edit] Ach, Moment, ist das ein Konsolenprogramm? In dem Fall müsstest Du wohl auf die
Win32-
API zurückgreifen und OEMToCharBuff bzw. CharToOEMBuff einsetzen. Allerdings erscheint mir das für eine Schulaufgabe etwas happig. [/edit]