Class TSoundEvent (unit AnotherReg)

Inherits from

TCustomKey

Constructors


constructor Create( anOwner :TComponent );

TSoundEvent


Functions

destructor Destroy;


procedure Play;


procedure RegisterSoundEvent;


procedure UnregisterSoundEvent;

Setting up \AppEvents\Schemes\Apps\\\.

procedure DoDelete;


function GetPath :string;

Changes parent key.

procedure Loaded;

At run-time registers event if AutoRegister is true

procedure SoundEvent;


function GetDefaultSoundName :String;

DefaultSoundName property read accessor.

function GetSOundName :String;


function ReadDefaultSoundName :string;


function ReadSoundName :string;


procedure SetDefaultSoundName( const NewName :String );

DefaultSoundName property write accessor.

procedure SetEventLabel( const NewLabel :String );


procedure SetSoundName( const NewName :String );


procedure WriteDefaultSoundName( const NewName :String );


procedure WriteSoundName( const NewName :String );


Properties

property AppConfigKey : TAppCOnfigKey


property AutoRegister : boolean


property DefaultSoundName : String


property EventLabel : String


property Options : TSoundEventOptions


property SoundName : String


Events

event OnSoundEvent : TNotifyEvent


Variables

FAppConfigKey : TAppConfigKey;


FAutoRegister : Boolean;


FDefaultSoundName : String;


FEventLabel : String;


FOnSoundEvent : TNotifyEvent;


FOptions : TSoundEventOptions;



Constructors


constructor Create( anOwner :TComponent );

TSoundEvent


Functions


destructor Destroy;


procedure Play;


procedure RegisterSoundEvent;


procedure UnregisterSoundEvent;

Setting up \AppEvents\Schemes\Apps\\\.Default key


procedure DoDelete;


function GetPath :string;

Changes parent key. Accepts only TAppConfigKey


procedure Loaded;

At run-time registers event if AutoRegister is true


procedure SoundEvent;


function GetDefaultSoundName :String;

DefaultSoundName property read accessor. At design-time returns value of FDefaultSoundName. At run-time returns default value of ".Default" subkey


function GetSOundName :String;


function ReadDefaultSoundName :string;


function ReadSoundName :string;


procedure SetDefaultSoundName( const NewName :String );

DefaultSoundName property write accessor. At design-time stores new name in FDefaultSoundName field. At run-time updates default value of ".Default" subkey.


procedure SetEventLabel( const NewLabel :String );


procedure SetSoundName( const NewName :String );


procedure WriteDefaultSoundName( const NewName :String );


procedure WriteSoundName( const NewName :String );


Properties


property AppConfigKey : TAppCOnfigKey


property AutoRegister : boolean


property DefaultSoundName : String


property EventLabel : String


property Options : TSoundEventOptions


property SoundName : String


Events


event OnSoundEvent : TNotifyEvent


Variables


FAppConfigKey : TAppConfigKey;


FAutoRegister : Boolean;


FDefaultSoundName : String;


FEventLabel : String;


FOnSoundEvent : TNotifyEvent;


FOptions : TSoundEventOptions;