Ich habe bis jetzt Folgendes versucht:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var fs: TFileStream;
b: Byte;
begin
fs := TFileStream.Create('test.txt', fmOpenRead);
fs.Read(b,1);
showmessage(chr(b));
fs.Free;
end;
leider gibt aber die Message nichts aus, obwohl es sich um eine Textdatei handelt.