Class TAMReg (unit AMReg)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;


function RBinaryData(const Key: string; var Buffer; BufSize: Integer): Integer;


function RBool(const Key: string): boolean;


function RCurrency(const Key: string): currency;


function RDate(const Key: string): TDateTime;


function RDateTime(const Key: string): TDateTime;


function RDString(const Key: string): string;


function RFloat(const Key: string): double;


function RInteger(const Key: string): integer;


function RString(const Key: string): string;


function RTime(const Key: string): TDateTime;


procedure WBinaryData(const Key: string; var Buffer; BufSize: Integer);


procedure WBool(const Key: string; Value: bool);


procedure WCurrency(const Key: string; Value: Currency);


procedure WDate(const Key: string; Value: TDateTime);


procedure WDateTime(const Key: string; Value: TDateTime);


procedure WEString(const Key, Value: string);


procedure WFloat(const Key: string; Value: Double);


procedure WInteger(const Key: string; Value: integer);


procedure WString(const Key, Value: string);


procedure WTime(const Key: string; Value: TDateTime);


procedure Loaded;


procedure UpdateKeyBasis;

Beginning of AMReg-component implementation.

function GetReg: TRegistry;


procedure SetActive(Value: Boolean);


procedure SetAutoUser(Value: Boolean);


procedure SetKeyBasis(Index: integer; Value: string);


Properties

property Application : string


property AutoUser : boolean


property Company : string


property Group : string


property RootKey : TRootKey


property User : string


property Active : boolean


property Reg : TRegistry


Events

Variables

FActive : boolean;


FApplication : string;


FAutoUser : boolean;


FCompany : string;


FGroup : string;


FReg : TRegistry;


FRootKey : TRootKey;


FUser : string;


KeyBasis : string;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;


function RBinaryData(const Key: string; var Buffer; BufSize: Integer): Integer;


function RBool(const Key: string): boolean;


function RCurrency(const Key: string): currency;


function RDate(const Key: string): TDateTime;


function RDateTime(const Key: string): TDateTime;


function RDString(const Key: string): string;


function RFloat(const Key: string): double;


function RInteger(const Key: string): integer;


function RString(const Key: string): string;


function RTime(const Key: string): TDateTime;


procedure WBinaryData(const Key: string; var Buffer; BufSize: Integer);


procedure WBool(const Key: string; Value: bool);


procedure WCurrency(const Key: string; Value: Currency);


procedure WDate(const Key: string; Value: TDateTime);


procedure WDateTime(const Key: string; Value: TDateTime);


procedure WEString(const Key, Value: string);


procedure WFloat(const Key: string; Value: Double);


procedure WInteger(const Key: string; Value: integer);


procedure WString(const Key, Value: string);


procedure WTime(const Key: string; Value: TDateTime);


procedure Loaded;


procedure UpdateKeyBasis;

Beginning of AMReg-component implementation...


function GetReg: TRegistry;


procedure SetActive(Value: Boolean);


procedure SetAutoUser(Value: Boolean);


procedure SetKeyBasis(Index: integer; Value: string);


Properties


property Application : string


property AutoUser : boolean


property Company : string


property Group : string


property RootKey : TRootKey


property User : string


property Active : boolean


property Reg : TRegistry


Events


Variables


FActive : boolean;


FApplication : string;


FAutoUser : boolean;


FCompany : string;


FGroup : string;


FReg : TRegistry;


FRootKey : TRootKey;


FUser : string;


KeyBasis : string;