This custom control is really three controls: Your choice of a ringing phone, an alarm clock or a wrist alarm. You can change the "style" of the control at any time via code.
Label2
Another neat feature is that you can use the custom control in place of the normal Icon when your form is minimized. It's a great way to draw the user's attention when action should be taken.
MhAlarm1
MhIAlarm
Style
Phone
Style
Alarm Clock
Style
Wrist Watch
VoiceOption
Label1
VoiceOption
Label1
Label3
Clicking the left mouse button on the items to the left increases the value, while clicking the right button decreases the value.
VoiceOption
Label1
Command1
Show Ring
Command2
Command1_Click2
Timer1
Enabled
Timer1_Timer
Pausing
Interval
RingCount
WhichBmp_
VisiblePictureC
Picturef
Command2_Click
Alarm%
Form_Click
@ Form_Load_
StartTime;
ElapsedTime
@ SoundTone
CloseSoundy
nVoice
CountVoiceNotes{
nVoiceQueue
OpenSoundq
S_SERDVNA
S_SEROFM
S_SERDSR
SetSoundNoise
nSourced
nDuration#
S_PERIOD5121
S_PERIOD1024@
S_PERIOD2048O
S_PERIODVOICE
S_WHITE5127
S_WHITE1024
S_WHITE2048H
S_WHITEVOICE+
SetVoiceAccent
nTempo
nVolume
nMode
nPitch
S_LEGATO
S_NORMALb
S_STACCATO
S_SERDMD
S_SERDTB
S_SERDVL
S_SERQFUL
SetVoiceNote
nValue
nLength'
nCDots
S_SERDCC
S_SERDLNO
S_SERDNT
S_SERDTP}
S_SERBDNT
StartSound
StopSound
Sound
SetVoiceQueueSize[
nBytes$
S_SERMACT
Initialized
Initiali
SoundStatus
Queue
False
InitSound
CDotsF
Value
Length
VoiceOption
Caption
VoiceOption_Click
Index
Bmp_Click
Form_Unload
Cancel
VisiblePicture_Click
VoiceOption_MouseDown
Button
Shift
Factort
PauseTime
StyleV
BmpPointer7
ShowAllOptions
Style_Click
ShowAllValue
ShowAllValues
Mode_Click
Phone
WhichMode
Mhalarm1
RingMode
RingTone
RingLength
RingOn
Form_Resize
windowstate
alarm1
MhTrue
MhFalse,
nMode% is one of:
Note held for full duration and blended with nextn
Note held for full duration, with full stop before next noter
Note held for part of duration, creating pronounced stop before next.