首页/技术开发/内容

在Delphi下用Direct Sound 完成混音器组件

技术开发2024-06-13 阅读()
DSBCAPS_CTRLDEFAULT;

  dsbufferdesc.dwBufferBytes=BufferSize;//缓冲区大小

  dsbufferdesc.lpwfxFormat=(LPWAVEFORMATEX)&pcmformat;//wav文件的PCM格式

  ErrorCode=lpDS->CreateSoundBuffer(&dsbd,&lpSB,NULL);

  建立该缓冲区后,通过IDirectSoundBuffer::Lock锁定内存即可写入数据。数据可以用普通MCI的多媒体函数读取,由于篇幅所限,这里不再详述,读者可以参考Win32 SDK手册和Direct X SDK的联机帮助。值得注意的是,Direct Sound的缓冲区是循环的,Lock返回两个指针,数据必须分成两部分写入。

  数据进入DirectSoundBuffer后,就可以调用IDirectSoundBuffer的声音控制方法来控制声音的播放、停止、频率、声道等特性。但要注意的是:因为Win95是多任务的,设备有可能被别的程序占用,所以IDirectSoundBuffer的功能调用可能会引发DSERR_BUFFERLOST错误。此时,如果要确保你的请求一定会得到响应,则必须调用IDirectSoundBuffer::Restore以重新获得设备。

  掌握了这些基本概念后,就可以在C++中编写Direct Sound的控制程序了,但Delphi无法直接存取上面提及的数据结构。为了解决这个问题,我们可以定义一个数组,分别代表不同的辅助缓冲区,Dephi通过该数组的索引来使用多个缓冲区。因此,我们的DLL中至少包括以下的接口函数:

  CreateDSoundInterface(HWND hwnd)//初始化

  LoadWave(int index, char *filename)//装入wav数据

  Play(int Index) //播放

  Stop(int Index)//停止

  Clear(int Index)//释放缓冲区

  当然,还可以加入其它控制,例如对频率、声道等的控制。

  有了动态链接库后,在Delphi中编写混音器组件的方法就比较简单了,与其它组件基本上没什么区别。

  首先,新建一个组件(New Component),设定其祖先类型为TComponent。然后,编写相应的方法初始化设备,实现DLL中提供的功能。这里只作两点说明:

  1、不要在继承的Create函数中加载DLL和初始化设备。不在构造方法中初始化设备是明智的做法,因为这样做较安全。

  2、因为DLL是用C编写的,所以接口函数说明必须是C的调用标准,例如可以像下面这个样子:

  Var

   DllFunction :

  function(Parametre : ParaType) : RusultType; cdecl;

  ......

  LibraryHandle=LoadLibrary('DllFile.dll');

  ......

  @DllFunction:=GetProcAddress(LibHandle,'DllFunction_Name');

  组件单元编好以后,可通过选择Component(北联网教程,专业提供视频软件下载)

第1页  第2页  第3页 

……

相关阅读