ReadFile liest nicht die ganze Datei

[Cmd.exe]

Hi Leute,
mein Problem hab ich im source code beschrieben. Hoffe ihr könnt mir helfen

Delphi-Quellcode:

//Beispielcode
//APIs.GetFileSize nutzt in dem Fall FindFirstFile um Größe der Datei zu erhalten (funktioniert)
var Buffer: pchar;
    i64: int64;
    hHandle: integer;
    lpNumberOfBytesRead: cardinal;
begin  
  i64 := APIs.GetFileSize(ExtractFilePath(ParamStr(0)) + 'Skin.cont');
  hHandle := // FileHandle
             CreateFile(pChar(ExtractFilePath(ParamStr(0)) + 'Skin.cont'), GENERIC_READ, FILE_SHARE_READ, Nil, OPEN_EXISTING, 0, 0);
  SetFilePointer // Pointer um von Anfang an zu lesen
                 (hHandle, 0, 0, FILE_BEGIN);
  GetMem(Buffer, i64);
  ReadFile(hHandle, Buffer^, i64, lpNumberOfBytesRead, NIL);
  FreeMem(Buffer, i64); //Breakpoint
end;
//Problem: lpNumberOfBytesRead sagt mir, dass es die volle Byte Zahl gelesen hat, 
//         jedoch ist nur ein geringer Teil (Anfang der Datei) im Buffer, wenn ich am Breakpoint mir den Buffer anzeigen lasse.

Vielen dank schonmal im voraus.