So gehts schon mal nicht. Ich erhalte zwar keine Fragezeichen mehr in dem Programm, aber dafür dann auch gar keinen Inhalt. Ich probiere mal weiter...
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
myList:TStringlist;
begin
myList:=TStringlist.Create;
myList.LoadFromFile('c:\test.txt');
Label1.Caption := WideStringToStringEx(myList.Strings[0],251);
end;
Inhalt der Textdatei:
CP_ACP
CP_MACCP
CP_OEMCP
CP_SYMBOL
CP_THREAD_ACP
CP_UTF7 Windows
CP_UTF8 Windows
Habe jetzt auch diese CodePages versucht, aber ich erhalte NIE ЕУЧЕ im Label angezeigt.