Changeset 315 for trunk/Packages/Common/RegistryEx.pas

Timestamp:

Jun 19, 2024, 11:15:44 PM (4 weeks ago)

Author:

chronos

Message:

• Modified: Updated Common package.

File:

• trunk/Packages/Common/RegistryEx.pas (moved) (moved from trunk/Packages/Common/URegistry.pas ) (3 diffs)

trunk/Packages/Common/RegistryEx.pas

@@ -1 @@
-unit URegistry;
-
-{$MODE delphi}
+unit RegistryEx;
 
 interface
@@ -48 +46 @@
     HKEY_CURRENT_CONFIG, HKEY_DYN_DATA);
 
+
 implementation
-
 
 { TRegistryContext }
@@ -135 +133 @@
   //CloseKey;
   {$ENDIF}
-  Result := inherited OpenKey(Key, CanCreate);
+  Result := inherited;
 end;