Delphi-Quellcode:
F: TextFile;
aStr: RawByteString;
//lStr: String;
...
AssignFile(F, OpenDialog1.Filename);
Reset(F);
while not Eof(F) do begin
ReadLn(F, aStr);
//lStr := Utf8Decode(aStr);
//Do_Auswerten(lStr);
Do_Auswerten(Utf8Decode(aStr));
end;
Diese alten "Pascal"-Funktionen arbeiten, auch unter D2009/2010,
immer nur mit
ANSI (oder notfalls anderen Single-Byte-Codierungen), selbt wenn man ihnen einen String/WideString/UnicodeString übergibt.