Ließt BlockRead aus Datei nich richtig ein?

[choose]

Zitat von Luckie:

Widerlegst du mich jetzt oder bestätigst du mich mit der Aussage?

ein kurzes Ausprobieren sollte Dir zeigen, dass die Folge

Delphi-Quellcode:

AssignFile(myFile, AFileName);
Reset(myFile);
Close(myFile);
Reset(myFile);
Readln(myFile, myByte);

funktioniert.

Zitat von Luckie:

Wenn ich ein Datei-Handle schließe und somit wieder freigebe, dürfte CreateFile ins Leere laufen oder nicht?

CreateFile erwartet kein Handle sondern ua einen Dateinamen, der ja, wie zuvor gezeigt von Close unbeeinflusst bleibt. Der Tatsächliche Code steht in der Unit System bei OpenFile

Code:

LEA      EAX,[EBX].TFileRec.Name
PUSH     EAX
CALL     CreateFileA
CMP      EAX,-1
JZ       @@error
MOV      [EBX].TFileRec.Handle,EAX

wie man sieht, wird das Handle nach dem erfolgreichen Aufruf in die Struktur innerhalb des File-Datentyps zurückgeschrieben.