readln? Gehen Umlaufe über die Windows-Konsole überhaupt?
Ja, aber dort hat man die OEM-Zeichensatz und Delphi nutzt
Ansi.
Eine mögliche Lösung für das ß könnte so aussehen:
Delphi-Quellcode:
program Project1;
{$APPTYPE CONSOLE}
var
eingabe : String;
dummy : String;
i : Integer;
begin
ReadLn(Eingabe);
dummy := '';
for i := 1 to Length(Eingabe) do begin
case ord(Eingabe[i]) of
225 : dummy := dummy + 'ss';
else
dummy := dummy + Eingabe[i];
end;
WriteLn(Eingabe[i],' = ',ord(Eingabe[i]));
end;
WriteLn(dummy);
ReadLn;
end.
Die anderen Umlaute bitte selbst herausfinden (Sollte aber mit den paar Zeilen hier kein Problem sein.)