Ließt BlockRead aus Datei nich richtig ein?

[choose]

Hallo Luckie,

dieser Pascal-Datentyp ist in Wirklichkeit in Record in dem uA ein Datei-Handle abgelegt wird, dass mit Close geschlossen wird.

Überzeuge Dich selbst:

Delphi-Quellcode:

type
  PTextRec = ^TTextRec;

begin
  AssignFile(myFile, AFileName);
  Writeln(PTextRec(@myFile)^.Name);

  Reset(myFile);
  try
    Writeln(PTextRec(@myFile)^.Name);
  finally
    Close(myFile);
    Writeln(PTextRec(@myFile)^.Name);
  end;
end;