Hallo,
ich habe ein Problem mit dem Befehl
WriteFile. Ich benutze Delphi 6. Wenn ich die folgenden Befehle ausführen lasse, bekomme ich immer nur eine 0-Byte-Datei:
Delphi-Quellcode:
Var
NR,SB : Cardinal;
Buffer : Array [1..5120] Of Byte;
FHandle : Cardinal;
Begin
SB:=SizeOf(Buffer);
FHandle:=CreateFile(PChar('C:\Test.$$$'),
GENERIC_READ or GENERIC_WRITE,
0,
nil,
CREATE_ALWAYS,
FILE_FLAG_NO_BUFFERING or FILE_FLAG_WRITE_THROUGH,
0);
If FHandle <> INVALID_HANDLE_VALUE Then
Begin
WriteFile(FHandle,Buffer,SB,NR,nil);
FileClose(FHandle);
End;
End;
Die Lese-/Schreibrechte sind nicht das Problem. Die Datei wird angelegt/überschrieben. Es muss also an WriteFile liegen.
1. Was mache ich falsch?
2. Wo gibt es eine schöne (und ggf. deutsche) Beschreibung für CreateFile, WriteFile, ReadFile etc.?