| Class TSoundEvent (unit AnotherReg) |
| Constructors |
constructor Create( anOwner :TComponent );| Functions |
destructor Destroy;
procedure Play;
procedure RegisterSoundEvent;
procedure UnregisterSoundEvent;
procedure DoDelete;
function GetPath :string;
procedure Loaded;
procedure SoundEvent;
function GetDefaultSoundName :String;
function GetSOundName :String;
function ReadDefaultSoundName :string;
function ReadSoundName :string;
procedure SetDefaultSoundName( const NewName :String );
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\ Changes parent key. Accepts only TAppConfigKey At run-time registers event if AutoRegister is true DefaultSoundName property read accessor. At design-time
returns value of FDefaultSoundName. At run-time returns
default value of ".Default" subkey DefaultSoundName property write accessor. At design-time stores
new name in FDefaultSoundName field. At run-time updates
default value of ".Default" subkey. Properties Events Variables
procedure DoDelete;
function GetPath :string;
procedure Loaded;
procedure SoundEvent;
function GetDefaultSoundName :String;
function GetSOundName :String;
function ReadDefaultSoundName :string;
function ReadSoundName :string;
procedure SetDefaultSoundName( const NewName :String );
procedure SetEventLabel( const NewLabel :String );
procedure SetSoundName( const NewName :String );
procedure WriteDefaultSoundName( const NewName :String );
procedure WriteSoundName( const NewName :String );
property AppConfigKey : TAppCOnfigKey
property AutoRegister : boolean
property DefaultSoundName : String
property EventLabel : String
property Options : TSoundEventOptions
property SoundName : String
event OnSoundEvent : TNotifyEvent
FAppConfigKey : TAppConfigKey;
FAutoRegister : Boolean;
FDefaultSoundName : String;
FEventLabel : String;
FOnSoundEvent : TNotifyEvent;
FOptions : TSoundEventOptions;