Occurs when the MM_MCINOTIFY message is received form a Mci device.
Sub Form_MciNotify(devID%, Code%)
Use this event to handle the MM_MCINOTIFY message ($3b9).
The Code% is returned in wParam.
wParam=1 - Mci command aborted
wParam=2 - Mci command successful
wParam=4 - Mci superseded by a new notify command
wParam=8 - Mci error, not reported when using Mci$()
The devID% is the device ID (devID%) sending the message, it is returned in the loword of the lParam.
LoWord(lParam) = Device ID
OpenW 1
Local t As Double = Timer
Mci "open c:\windows\media\alarm01.wav alias bong"
~Mci$("play bong from 1 notify")
Do
PeekEvent
Print AT(1, 1); "Playing Track: "; Format(Timer - t, "0.000"); " secs"
Loop Until Mci$("status bong mode") != "playing"
Mci "close bong"
CloseW 1
Sub Win_1_MciNotify(devID%, Code%)
Debug.Show
Trace Code%
Trace devID%
Trace mciID("bong")
EndSub
{Created by Sjouke Hamstra; Last updated: 16/10/2014 by James Gaite}