Merged revisions 1088-1089 via svnmerge from

/trunk

git-svn-id: branches/fixes_2_0@1132 -

rtl/emx/sysutils.pp

@@ -582,7 +582,7 @@ begin
     if os_mode = osOS2 then
         begin
             New (FStat);
-            Rslt.FindHandle := $FFFFFFFF;
+            Rslt.FindHandle := THandle ($FFFFFFFF);
             Count := 1;
             Err := DosFindFirst (PChar (Path), Rslt.FindHandle,
                    Attr and FindResvdMask, FStat, SizeOf (FStat^), Count,

rtl/os2/sysutils.pp

@@ -568,7 +568,7 @@ var SR: PSearchRec;
 
 begin
   New (FStat);
-  Rslt.FindHandle := $FFFFFFFF;
+  Rslt.FindHandle := THandle ($FFFFFFFF);
   Count := 1;
   Err := DosFindFirst (PChar (Path), Rslt.FindHandle,
             Attr and FindResvdMask, FStat, SizeOf (FStat^), Count, ilStandard);