Hi,
so aus der Hüfte geschossen:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
Var
S:String;
begin
S := Edit10.Text;
S := StringReplace(S,'ü','ue',[rfReplaceAll]);
S := StringReplace(S,'ö','oe',[rfReplaceAll]);
S := StringReplace(S,'ä','ae',[rfReplaceAll]);
Edit10.Text := S;
end;
edit: Hi mquadrat,
2 ??? 1 Gedanke
und das auch noch zeitgleich
