Browse Source

Fix for TIdIOHandler.ReadLongWord() under 64-bit systems.

RemyLebeau 14 years ago
parent
commit
0b253e643f
1 changed files with 1 additions and 1 deletions
  1. 1 1
      Lib/Core/IdIOHandler.pas

+ 1 - 1
Lib/Core/IdIOHandler.pas

@@ -1218,7 +1218,7 @@ function TIdIOHandler.ReadLongWord(AConvert: Boolean): LongWord;
 var
   LBytes: TIdBytes;
 begin
-  ReadBytes(LBytes, SizeOf(LBytes), False);
+  ReadBytes(LBytes, SizeOf(LongWord), False);
   Result := BytesToLongWord(LBytes);
   if AConvert then begin
     Result := GStack.NetworkToHost(Result);