请问怎么样调用API函数在PB中实现播放WAV文件的功能
我有一个问题就是怎么样调用API函数在PB中实现播放WAV文件的功能!
我用下面的代码为什么没有完成这个功能,请问各位在PB中播放WAV文件这个问题中有什么好的办法呢?
环境PB8系统WIN98。
代码如下
SndPlaySoundA()和WaveOutGetNumDevs()
功能这两个函数结合起来使用用于播放.WAV 格式的文件
声明格式FUNCTION boolean SndPlaySoundA(string wavfile, uint flag) LIBRARY
"WINMM.DLL"
FUNCTION uint WaveOutGetNumDevs() LIBRARY "WINMM.DLL"
示例uint lui_NumDevs, l_mode
string ls_file
l_mode = 0
ls_file = string"c:\windows\media\chimes.wav"
lui_NumDevs = WaveOutGetNumDevs()
IF lui_NumDevs > 0 THEN
SndPlaySoundA(ls_file, l_mode)
END IF