释放对象。也就是说，在调用并回放

MIDI 文件以前要对 DirectMusic 对

象进行初始化（包括对象的创建、数据段装载和声音通道初始化）。下

面的几个函数可以实现这一初始化过程：

1.DirectMusicPerformanceCreate：创建一个

DirectMusicPerformance8 对象

调用：

object.DirectMusicPerformanceCreate() As 

DirectMusicPerformance8

参数：

object : DirectX8 对象

返回：

DirectMusicPerformance8 对象

错误：如果调用不成功，

Err.Number 置位

2.DirectMusicLoaderCreate：创建一个 DirectMusicLoader8 对象

调用：

Object.DirectMusicLoaderCreate() As 

DirectMusicLoader8

参数：

object : DirectX8 对象

返回：

DirectMusicLoader8 对象

错误：如果调用不成功，

Err.Number 置位

3.InitAudio：初始化 Performance 对象，要让声音能够正常播放，此

函数应该首先被调用。

调用：

object.InitAudio (hWnd As Long, lFlags As 

CONST_DMUS_AUDIO,  _

AudioParams As DMUS_AUDIOPARAMS,  _

[DirectSound As DirectSound8],  _