Hallo zusammen,
ich lese unter Delphi XE eine UTF-8 Datei ein (wird in Notepad als UTF-8 Datei erkannt).
Diese Datei muss ich als
ANSI-Datei neu abspeichern. Dabei sollen die Umlaute erhalten bleiben.
Folgenden Code nutze ich:
Delphi-Quellcode:
slFile.LoadFromFile(dlgOpen1.Filename);
for i := 0 to slFile.Count - 1 do begin
slFile.Strings[i] := Utf8ToAnsi(slFile.Strings[i]);
end;
slFile.SaveToFile(dlgOpen1.Filename);
Wenn ich die neu erstellte Datei mit Notepad öffne, sehe ich, dass es eine
ANSI Datei ist.
Aber anstelle der Umlaute stehen Fragezeichen in der Datei.
Weiß hierzu jemand Rat?
Vielen Dank schon mal vorab!