Easy Registry utilities

Unit

acUtils

Declarations

{ Whether the value exists in Registry }

function IsRegValueExists(const KeyName, ValueName: String; RootKey: hKey = HKEY_CURRENT_USER): Boolean;

{ Read string from Registry. Returns empty string if failed }

function RegReadStr(const KeyName, ValueName: String; RootKey: hKey = HKEY_CURRENT_USER): String;

{ Write string to Registry }

procedure RegWriteStr(const KeyName, ValueName, Value: String; RootKey: hKey = HKEY_CURRENT_USER);

{ Read integer value from Registry. You can specify default value if the key doesn't exists.}

function RegReadInt(const KeyName, ValueName: String; DefaultValue: Integer = 0; RootKey: hKey = HKEY_CURRENT_USER): LongInt;

{ Write integer value to Registry }

procedure RegWriteInt(const KeyName, ValueName: String; Value: Integer; RootKey: hKey = HKEY_CURRENT_USER);

{ Deletes value from Registry }

procedure RegEraseValue(const KeyName, ValueName: String; RootKey: hKey = HKEY_CURRENT_USER);

{ Deletes the registry key and all its subkeys }

procedure RegEraseKey(const KeyName: String; const RootKey: hKey = HKEY_CURRENT_USER; DeleteAllSubkeys: Boolean = True);

{ Reads Font settings from registry }

procedure RegReadFont(const KeyName, ValueName: String; Font: TFont; RootKey: hKey = HKEY_CURRENT_USER);

{ Writes Font settings to registry }

procedure RegWriteFont(const KeyName, ValueName: String; Font: TFont; RootKey: hKey = HKEY_CURRENT_USER);

Description

These routines gives you some easy and simple functions to work with system registry without hard Registry unit.