Class TRegistryEnhanced (unit RegistryEnhanced)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);

*************************************************************************} { CONSTRUCTOR Create } {


Functions

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 } {

Properties

property Access : TAccess


property Key : String


property RootKey : TRootKey


property EntriesFound : TStringList


Events

Variables

FAccess : TAccess;


FBrkApart : TBrkApart;


FBuffer : Pchar;


FEntriesFound : TStringList;


FKey : String;


FRootKey : TRootKey;



Constructors


constructor Create(AOwner: TComponent);

*************************************************************************} { CONSTRUCTOR Create } {


Functions


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 } {


Properties


property Access : TAccess


property Key : String


property RootKey : TRootKey


property EntriesFound : TStringList


Events


Variables


FAccess : TAccess;


FBrkApart : TBrkApart;


FBuffer : Pchar;


FEntriesFound : TStringList;


FKey : String;


FRootKey : TRootKey;