diff --git a/rtl/objpas/sysutils/syshelpo.inc b/rtl/objpas/sysutils/syshelpo.inc
index b46896983c..10dd9c7a7a 100644
--- a/rtl/objpas/sysutils/syshelpo.inc
+++ b/rtl/objpas/sysutils/syshelpo.inc
@@ -49,13 +49,13 @@ Function TORDINALHELPER.ToHexString(const AMinDigits: Integer): string;
 overload; inline;
 
 begin
-  Result:=HexStr(Self,AMinDigits);
+  Result:=IntToHex(Self,AMinDigits);
 end;
 
 Function TORDINALHELPER.ToHexString: string; overload; inline;
 
 begin
-  Result:=HexStr(Self,SizeOf(TORDINALTYPE)*2);
+  Result:=IntToHex(Self,SizeOf(TORDINALTYPE)*2);
 end;
 
 Function TORDINALHELPER.ToSingle: Single; inline;
diff --git a/rtl/wince/wininc/defines.inc b/rtl/wince/wininc/defines.inc
index ad0c686136..a39f41a69f 100644
--- a/rtl/wince/wininc/defines.inc
+++ b/rtl/wince/wininc/defines.inc
@@ -2225,6 +2225,7 @@
      REG_LINK = 6;
      REG_MULTI_SZ = 7;
      REG_NONE = 0;
+     REG_QWORD = 11;
      REG_RESOURCE_LIST = 8;
      REG_RESOURCE_REQUIREMENTS_LIST = 10;
      REG_SZ = 1;