* hInstance has 64 bits on Win64, avoid cutting it off when storing it into SysInstance

git-svn-id: trunk@42294 -

rtl/win64/sysinit.pp

@@ -20,7 +20,7 @@ unit sysinit;
   implementation
 
    var
-      SysInstance : LongInt;
+      SysInstance : QWord;
       TlsKeyVar: DWord = $ffffffff;
 
       InitFinalTable : record end; external name 'INITFINAL';