ReadFile und WriteFile

[Schwedenbitter]

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.?