Hallo,
Wie kann ich aus einer Datei ein Widestring einlesen, der dabei mit
Unicode (Türkische Buchstaben) gefüllt wird? Mit Read funktioniert das ja nicht:
Delphi-Quellcode:
var
Wort:WideString;
Datei:TextFile;
begin
SetCurrentDir ('
D:/');
AssignFile(Datei, '
Datei.txt');
//Datei.txt ist im Unicode Format
Reset (Datei);
Read (Datei, Wort);
// Wort enthält auf diese Weise ja keine türkischen Buchstaben/Unicode sondern ANSI-Zeichensalat
CloseFile(Datei);
Für Türkische Sprache im Programm greife ich momentan ansonsten auf die TNT Units der Version 2.3.0 zurück (manuell), habe aber leider darin bisher keine Entsprechung für Read gefunden.
Zusammengefasst: Ich suche also einen Befehl (aus den TNT Units) um aus einer
Unicode Datei, ein Wort in
Unicode Zeichen in einem Widestring einzulesen, um diesen anschließend innerhalb des Programms weitergeben zu können.
Kann mir jemand weiter helfen?
Liebe Grüße,
Tillie