Thema: Delphi Umlaute ersetzen?

Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.756 Beiträge
 
Delphi 10.4 Sydney
 
#4

Re: Umlaute ersetzen?

  Alt 14. Mär 2006, 09:46
was mir so auffällt ist das Du immer von Edit10.text die Umlaute austauscht.
Letzendlich hast Du zum Schluß nur die ä ausgetauscht.

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
Var
S:String;
begin
S := StringReplace(Edit10.Text,'ü','ue',[rfReplaceAll]);
S := StringReplace(s,'ö','oe',[rfReplaceAll]);
S := StringReplace(s,'ä','ae',[rfReplaceAll]);
Edit10.Text := S;
end;
Grüße
Klaus


[edit] ups zum 3. [/edit]
Klaus
  Mit Zitat antworten Zitat