请教,PB如何调用.wav音频文件,并且让此文件循环播放,在想让音频播放结束时,如何结束,在线等候,立即结账!!

zhangxf2000 2003-01-06 10:11:34
请教,PB如何调用.wav音频文件,并且让此文件循环播放,在想让音频播放结束时,如何结束,在线等候,立即结账!!thanks!!
...全文
64 8 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
侠雨飞飞 2003-02-21
  • 打赏
  • 举报
回复
最省事的做法是
声明全局函数: FUNCTION ulong sndPlaySound(ref string lpszSoundName,ulong uFlags) LIBRARY
"winmm.dll" ALIAS FOR "sndPlaySoundA"

然后在timer中调用: sndPlaySound('msg.wav',3)
终止时将timer关闭即可

呵呵~


toutou 2003-01-12
  • 打赏
  • 举报
回复
同意balloonman2002(唉,MM,啊) ,我也是这样做。
balloonman2002 2003-01-12
  • 打赏
  • 举报
回复
Q : PB里面调用音乐(wav文件)的例子
主要解答者: songfrh 提交人: herotx
感谢: songfrh
审核者: wu_07 论坛对应贴子: 查看
A :

---------------------------------------------------------------

FUNCTION ulong waveOutGetNumDevs() LIBRARY "winmm.dll "
FUNCTION ulong sndPlaySound(ref string lpszSoundName,ulong uFlags) LIBRARY "winmm.dll " ALIAS FOR "sndPlaySoundA "

//播放wav文件

ulong ll_numdevs,ll_mode

ll_mode = 0

ll_numdevs = waveOutGetNumDevs()
if ll_numdevs > 0 then
sndPlaySound(as_wavfile,ll_mode)
end if

到网上搜索一下该API的参数即可实现循环、停止,,,

如果不行,那就用第三方控件吧,,,
erigido 2003-01-11
  • 打赏
  • 举报
回复
up
bomber2001 2003-01-06
  • 打赏
  • 举报
回复
up
killerdanny 2003-01-06
  • 打赏
  • 举报
回复
今天还好,经常要出门的!
YewPu 2003-01-06
  • 打赏
  • 举报
回复
killerdanny,你很少在这儿回答问题,是不是很忙啊!
killerdanny 2003-01-06
  • 打赏
  • 举报
回复
http://www.liulee.net/shares/share_open.php?id=1020592713

用系统自带的media player

1,108

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧