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.