As I mentioned, I was trying to avoid the WinMM. Basically, I'm trying to
synchronise playback (particularly MIDI) with other activity. MMSystem is
a lower level platform, of which WinMM also uses (supposedly).
I need MMSystem for such functions as MidiInOpen, MidiInStart,
MidiInAddBuffer, PutMidiOut etc.
Dom
"Arno R" <ar****************@planet.nlwrote in message
news:47***********************@text.nova.planet.nl ...
"Dominic Vella" <do***********@optusnet.com.auschreef in bericht
news:47***********************@news.optusnet.com.a u...
Does anyone know why I would be getting a "File not found: mmsystem"?
I've tried this:
Declare Function sndPlaySound Lib "mmsystem" (ByVal lpszSoundName As
String, ByVal wFlags As Integer) As Integer
I can see 'mmsystem.dll' in my "c:\windows\system" directory
I really want to use the 'mmsystem' library because of it's high level
Timing and I'd rather not go the WINMM direction as it doesn't have other
great functions I want to use.
Thanks in advance.
Dominic
This works for me to play files:
Private Declare Function apiPlaySound Lib "Winmm.dll" Alias "sndPlaySoundA"
_
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Function csvPlayWave(ByVal FileName As String, ByVal How As Integer) As
Integer
csvPlayWave = apiPlaySound(Trim(FileName), How)
end Function
'Example: ReturnCode =csvPlayWave("c:\windows\media\tada.wav", 1)
Arno R