Winmm Open Mixer Error...

[Dom Lague]

Hello

I REALLY appreciate the help. At the moment, while I am stumbling
through the Platform SDK, I am just starting at trying to open the
device. Here is my declaration:
Declare Function mixerOpen Lib "winmm.dll" Alias "mixerOpen" (ByVal phmx
As Long, ByVal uMxId As Long, ByVal dwCallback As Long, ByVal dwInstance
As Long, ByVal fdwOpen As Long) As Long
And then my code:

Dim rc, phmx, uMxId As Long
uMxId = 0
'Try to open mixer device 0
rc = mixerOpen(phmx, uMxId, 0, 0, 0)
The source code that I have seen shows that 'MMSYSERR NOERROR = 0'.
Therefore the result of RC should equal MMSYSERR NOERROR, but the result
of RC when I run the program is '11', not '0'. None of the code that I
have seen explains what '11' is. I can only assume that since RC does
not equal '0', then it has not opened the device. The Platform SDK
tells me the name of the errors that are returned but not what the
values are!!

Dazz

I have the same problem...

Dom

[Herfried K. Wagner [MVP]]

* Do******@hotmail.com (Dom Lague) scripsit:

I REALLY appreciate the help. At the moment, while I am stumbling
through the Platform SDK, I am just starting at trying to open the
device. Here is my declaration:
Declare Function mixerOpen Lib "winmm.dll" Alias "mixerOpen" (ByVal phmx
As Long, ByVal uMxId As Long, ByVal dwCallback As Long, ByVal dwInstance
As Long, ByVal fdwOpen As Long) As Long
Replace all 'As Long' with 'As Int32'. The last parameter can be
declared as 'Boolean', 'uMxId' as 'UInt32'.
And then my code:

Dim rc, phmx, uMxId As Long

'Long' -> 'Int32' ('Integer').

--
Herfried K. Wagner [MVP]
<http://www.mvps.org/dotnet>