Par2: BEEPing the speaker 2003-07-19 -- George Curtis ! Place this in: Global > Embeds > Inside the Global Map
Module('kernel32.DLL')
DOSBeep(Long dwFreq, Long dwDuration),Long,Raw,Pascal,Name('Beep'),Proc
End
! NOTE: The actual API prototype is Beep NOT DOSBeep. The name has been changed to
avoid compiler errors due to
! the Clarion Beep statement.
Declare to variables (global or local depending on your needs):
Freq Long ! frequency of the sound
Last Long ! duration of the sound
Call the function from anywhere as in the example below:
DOSBeep(Freq, Last)
Printed May 7, 2024, 9:15 pm This article has been viewed/printed 35119 times. |