Variablentypen bei ord() erzeugen Fehler

[KodeZwerg]

Delphi-Quellcode:

var
  t: Textfile; // das hier für ReadLn() / WriteLn() funktioniert besser
begin
  AssignFile(t,Application.ExeName+'.txt');
  Rewrite(t); // <-- wenn Datei neu ist, so wird sie erzeugt.
  Writeln(t, dateistring);
  CloseFile(t);
end;