Umlaute ersetzen?

[spox]

Funzt leider nicht...

Delphi-Quellcode:

eingabe:= Edit2.Text;
eingabe := StringReplace(Text,'ae','ä',[rfReplaceAll]);
eingabe := StringReplace(Text,'ue','ü',[rfReplaceAll]);
eingabe := StringReplace(Text,'oe','ö',[rfReplaceAll]);
eingabe := StringReplace(Text,'Ae','Ä',[rfReplaceAll]);
eingabe := StringReplace(Text,'Ue','Ü',[rfReplaceAll]);
eingabe := StringReplace(Text,'Oe','Ö',[rfReplaceAll]);
Edit1.Text:= eingabe;

Er schreibt meinen Programmnamen in das EditFeld :