Class TRegistryEnhanced (unit RegistryEnhanced) |
Inherits from
TComponent
constructor Create(AOwner: TComponent);
- *************************************************************************} { CONSTRUCTOR Create } {
procedure DeleteKey(AKey:String);
*************************************************************************} { PROCEDURE DeleteKey } {
procedure DeleteValue(AValue:String);
*************************************************************************} { PROCEDURE DeleteValue } {
destructor Destroy;
*************************************************************************} { DESTRUCTOR Destroy } {
procedure GetSubKeys(ASubKey: String; AList:TStrings);
*************************************************************************} { PROCEDURE GetSubKeys } {
function GetValue(AValue:String): Variant;
*************************************************************************} { FUNCTION GetValue } {
function GetValueDefault(AValue:string;AValueDataDefault:Variant): Variant;
*************************************************************************} { PROCEDURE GetValueDefault } {
procedure GetValueNames(ASubKey: String; AList:TStrings);
*************************************************************************} { PROCEDURE GetValueNames } {
procedure RenameKey(OldKey,NewKey:String);
*************************************************************************} { PROCEDURE RenameKey } {
procedure RenameValue(OldValue,NewValue:String);
*************************************************************************} { PROCEDURE RenameValue } {
procedure Search(ASubKey,AString:string;ASearchOption:TSearchOption);
*************************************************************************} { PROCEDURE Search } {***************************************************************************} { ASubKey: SubKey of research } { AString: String to search } { ASearchOption: Search Option } { + opValue: Search in Value only } { + opData: Search in Data only } { + opValueData: Search in Value and Data } {
procedure SetBinaryValue(AValue:string;var AValueData);
*************************************************************************} { PROCEDURE SetBinaryValue } {
procedure SetValue(AValue:string;AValueData:Variant);
*************************************************************************} { PROCEDURE SetValue } {
function CheckKey(AKey: String):string;
*************************************************************************} { FUNCTION CheckKey } {
function ExtractKeyPath(APath: String): string;
*************************************************************************} { FUNCTION ExtractKeyPath } {
function ExtractKeyValue(APath: String): string;
*************************************************************************} { FUNCTION ExtractKeyValue } {
function RetrieveValueNames(AString:string;ASearchOption:TSearchOption):boolean;
*************************************************************************} { FUNCTION RetrieveValueNames } {
property Access : TAccess
property Key : String
property RootKey : TRootKey
property EntriesFound : TStringList
FAccess : TAccess;
FBrkApart : TBrkApart;
FBuffer : Pchar;
FEntriesFound : TStringList;
FKey : String;
FRootKey : TRootKey;
constructor Create(AOwner: TComponent);
*************************************************************************} { CONSTRUCTOR Create } {
procedure DeleteKey(AKey:String);
*************************************************************************} { PROCEDURE DeleteKey } {
procedure DeleteValue(AValue:String);
*************************************************************************} { PROCEDURE DeleteValue } {
destructor Destroy;
*************************************************************************} { DESTRUCTOR Destroy } {
procedure GetSubKeys(ASubKey: String; AList:TStrings);
*************************************************************************} { PROCEDURE GetSubKeys } {
function GetValue(AValue:String): Variant;
*************************************************************************} { FUNCTION GetValue } {
function GetValueDefault(AValue:string;AValueDataDefault:Variant): Variant;
*************************************************************************} { PROCEDURE GetValueDefault } {
procedure GetValueNames(ASubKey: String; AList:TStrings);
*************************************************************************} { PROCEDURE GetValueNames } {
procedure RenameKey(OldKey,NewKey:String);
*************************************************************************} { PROCEDURE RenameKey } {
procedure RenameValue(OldValue,NewValue:String);
*************************************************************************} { PROCEDURE RenameValue } {
procedure Search(ASubKey,AString:string;ASearchOption:TSearchOption);
*************************************************************************} { PROCEDURE Search } {***************************************************************************} { ASubKey: SubKey of research } { AString: String to search } { ASearchOption: Search Option } { + opValue: Search in Value only } { + opData: Search in Data only } { + opValueData: Search in Value and Data } {
procedure SetBinaryValue(AValue:string;var AValueData);
*************************************************************************} { PROCEDURE SetBinaryValue } {
procedure SetValue(AValue:string;AValueData:Variant);
*************************************************************************} { PROCEDURE SetValue } {
function CheckKey(AKey: String):string;
*************************************************************************} { FUNCTION CheckKey } {
function ExtractKeyPath(APath: String): string;
*************************************************************************} { FUNCTION ExtractKeyPath } {
function ExtractKeyValue(APath: String): string;
*************************************************************************} { FUNCTION ExtractKeyValue } {
function RetrieveValueNames(AString:string;ASearchOption:TSearchOption):boolean;
*************************************************************************} { FUNCTION RetrieveValueNames } {
property Access : TAccess
property Key : String
property RootKey : TRootKey
property EntriesFound : TStringList
FAccess : TAccess;
FBrkApart : TBrkApart;
FBuffer : Pchar;
FEntriesFound : TStringList;
FKey : String;
FRootKey : TRootKey;