* fixed 64-bit size of findmatch. (mantis 13504) Tested with $12000001 bytes large file, matched to the byte.

git-svn-id: trunk@13014 -

rtl/win/sysutils.pp

@@ -380,7 +380,7 @@ begin
    end;
   { Convert some attributes back }
   WinToDosTime(F.FindData.ftLastWriteTime,F.Time);
-  f.size:=F.FindData.NFileSizeLow;
+  f.size:=F.FindData.NFileSizeLow+(qword(maxdword)+1)*F.FindData.NFileSizeHigh;
   f.attr:=F.FindData.dwFileAttributes;
   f.Name:=StrPas(@F.FindData.cFileName[0]);
   Result:=0;