Zeichenkette durch Umlaut ersetzen

**AWilhelm**

Hallo zusammen,

ich möchte einen Text aus einer INI-Datei auslesen und diesen in ein TEdit-Feld schreiben. Zusätzlich soll vorher in dem Text die Zeichenfolge "\u00e4" durch ein "ä" ersetzt werden. In dem Textfeld wird dann aber statt des "ä" ein "?" angezeigt.

zusammenfalten · markieren

Delphi-Quellcode:

			//------------------------------------------------------------------------------------------------------------------------------------------------------------

function GetIniStr( iniFilename, iniSect, IniEntry, iniDefault : string ) : string;

//------------------------------------------------------------------------------------------------------------------------------------------------------------

var inifile         : TMemIniFile;

begin

   result := inidefault;

   inifile := TMemIniFile.create( iniFilename );

   try

      result := inifile.ReadString( iniSect, IniEntry, iniDefault );

      result := StringReplace(result, '\u00e4', 'ä', [rfReplaceAll]);

   finally

      inifile.Free;

   end;

end;

txtSuchdatum.Text := GetIniStr('config.ini', 'Testsection', 'TestEntry', '');

Zeichenkette durch Umlaut ersetzen

Zeichenkette durch Umlaut ersetzen

Forumregeln