Kbase P29724: How to Call WIN32 API Function: MessageBeep
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
07/07/2003 |
|
Status: Unverified
GOAL:
How to Call WIN32 API Function: MessageBeep
FIX:
The following sample code shows how to call the Win32 API function called MessageBeep. This function plays a system sound as specified in the "Sounds" control panel.
This code has been tested on Windows NT 4.0 Workstation only.
&GLOBAL-DEFINE MB_ICONHAND 16
&GLOBAL-DEFINE MB_ICONQUESTION 32
&GLOBAL-DEFINE MB_ICONEXCLAMATION 48
&GLOBAL-DEFINE MB_ICONASTERISK 64
PROCEDURE MessageBeep EXTERNAL "USER32.DLL":
DEFINE INPUT PARAMETER intType AS LONG NO-UNDO.
END PROCEDURE.
RUN MessageBeep ({&MB_ICONHAND}).