DirectX

Has anyone else tried to do any directx stuff using the DirectX8.1 type
library? The activeX component wizard generates the classes,structs and
constants with no problems. I'm only looking at the DirectX Audio and am
having problems initialising the DirectMusicPerformance object.

dx8 := DxIDirectX8 new.    "Okay"
dmp := dx8 directMusicPerformanceCreate. "Okay"
audioParams := DxDMUS_AUDIOPARAMS new. "Okay"
audioParams lValidData:0.  "Okay"
audioParams dwSize:(audioParams size). "Okay"
dmp initAudio:(View active asParameter) lFlags: DMUS_AUDIOF_ALL audioParams:
audioParams directSound: nil  lDefaultPathType:
DMUS_APATH_SHARED_STEREOPLUSREVERB lPChannelCount: 16 .

The call to initAudio: LFlags: audioParams: directSound: lDefaultPathType:
lPChanelCount:
Raises the following walkback

17:43:15, 20 April 2002: 'Unspecified error (16r4005: Unspecified error)'
DxDirectMusicPerformance8(ExternalStructure)>>hresultError:
DxDirectMusicPerformance8(ExternalStructure)>>invalidCall
DxDirectMusicPerformance8>>InitAudio:lFlags:AudioParams:directSound:lDefault
PathType:lPChannelCount:
DxDirectMusicPerformance8>>initAudio:lFlags:audioParams:directSound:lDefault
PathType:lPChannelCount:
UndefinedObject>>{unbound}doIt
CompiledExpression>>value:
SmalltalkWorkspace>>evaluateRange:ifFail:debug:
SmalltalkWorkspace>>evaluateItIfFail:debug:
SmalltalkWorkspace>>evaluateItIfFail:
SmalltalkWorkspace>>evaluateIt

Any clues as to where the problem lies.

David