Danke! ich hab eure Vorschläge mal in ein test-Programm integriert:
Delphi-Quellcode:
var txt:textfile;
s: string;
c: char;
i:integer;
begin
assign(txt,'E:\t.txt');
reset(txt);
while not eof(txt) do
begin
readln(txt,c);
write(chartooem(c)); // Fehlermeldung: "Inkompatible Typen: 'Char' und 'PAnsiChar'"
end;
readln;
close(txt);
.. aber leider kommt die oben genannte Fehlermeldung.