فهرست منبع

* changed HKEY constants to integer

armin 22 سال پیش
والد
کامیت
7d6ebce0b3
1فایلهای تغییر یافته به همراه14 افزوده شده و 7 حذف شده
  1. 14 7
      fcl/inc/regdef.inc

+ 14 - 7
fcl/inc/regdef.inc

@@ -1,12 +1,12 @@
 
 Const
-  HKEY_CLASSES_ROOT     = $80000000;
-  HKEY_CURRENT_USER     = $80000001;
-  HKEY_LOCAL_MACHINE    = $80000002;
-  HKEY_USERS            = $80000003;
-  HKEY_PERFORMANCE_DATA = $80000004;
-  HKEY_CURRENT_CONFIG   = $80000005;
-  HKEY_DYN_DATA         = $80000006;
+  HKEY_CLASSES_ROOT     = Integer($80000000);
+  HKEY_CURRENT_USER     = Integer($80000001);
+  HKEY_LOCAL_MACHINE    = Integer($80000002);
+  HKEY_USERS            = Integer($80000003);
+  HKEY_PERFORMANCE_DATA = Integer($80000004);
+  HKEY_CURRENT_CONFIG   = Integer($80000005);
+  HKEY_DYN_DATA         = Integer($80000006);
 
   KEY_ALL_ACCESS         = $F003F;
   KEY_CREATE_LINK        = 32;
@@ -61,3 +61,10 @@ Type
 
   HKEY = Integer;
   PHKEY = ^HKEY;
+
+{
+  $Log$
+  Revision 1.2  2003-03-23 01:40:28  armin
+  * changed HKEY constants to integer
+
+}