Zitat von
DeddyH:
Ich hab mal alles bis auf die Bezeichnung aus der Datei rausgeworfen und mit folgendem Code getestet:
Delphi-Quellcode:
var sl: TStringlist;
s: string;
begin
sl := TStringlist.Create;
try
sl.LoadFromFile('E:\muster.txt');
s := sl[0];
OemToChar(PChar(s),PChar(s));
ShowMessage(s);
finally
sl.Free;
end;
end;
Sieht einwandfrei aus (siehe Anhang).
sieht wirklich gut aus, muss ich mal sehen ob ich noch wo nen Fehler drin hatte