Dateizugriff: Typisierte datei öffnen problem

[Phistev]

Delphi-Quellcode:

else
  begin
    test := filecreate(telebuch);
    fileclose(test);
    Readfile;
  end;

Delphi-Quellcode:

   begin
    test := filecreate(telebuch);
    fileclose(test);
    save2file;
   end

um genau zu sein