* hmodule should scale with pointertype on non-windows.

git-svn-id: trunk@15510 -

rtl/objpas/classes/classesh.inc

@@ -36,7 +36,7 @@ type
    TSmallPoint = record
       x,y : smallint;
    end;
-   HMODULE = longint;
+   HMODULE = ptrint; // hmodule is handle on windows. Pointer eq.
 {$else}
    TSmallPoint = Windows.TSmallPoint;
    HModule = System.HModule;