Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Make a sound
Message
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Title:
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01138013
Message ID:
01138206
Views:
11
Cool!
>>What is a simple way of creating two different sounds that will represent good and bad entry?
>>
>>Thanks
>
>
FUNCTION Beep
>LPARAMETERS nFrequency, nDuration
>
>  IF EMPTY(nFrequency)
>    nFrequency = 1000
>  ENDIF
>
>  IF EMPTY(nDuration)
>    nDuration = 40
>  ENDIF
>
>  DECLARE Beep IN Win32API INTEGER dwFreq, INTEGER dwDuration
>
>  =Beep(nFrequency, nDuration)
>
>RETURN
>
>or
>Just for joke:)
>
>
>loSpeak = CREATEOBJECT("SAPI.SPVoice")
>loSpeak.Speak("beep")
>
>
>or
>
>Set Bell to "c:\windows\media\chimes.wav"
>?? Chr(7)
>Set bell to && restore default beep
>
Imagination is more important than knowledge
Previous
Reply
Map
View

Click here to load this message in the networking platform