FIX: Error checking

This commit is contained in:
Alexander Koblov 2016-10-01 08:56:49 +00:00
commit 5a25ae660d

View file

@ -445,7 +445,7 @@ begin
bRetryRead := False;
BytesRead := FileRead(hFile, FBuffer^, BytesToRead);
if (BytesRead = 0) then
if (BytesRead <= 0) then
Raise EReadError.Create(mbSysErrorMessage(GetLastOSError));
TotalBytesToRead := TotalBytesToRead - BytesRead;