主题:  怎样将MIDI音乐做背景音乐循环播放?

welcome66

职务:普通成员
等级:1
金币:0.0
发贴:5
注册:2001/5/14 14:58:38
#12001/5/17 16:12:24
怎样将MIDI做背景音乐循环播放,如用U32请告之什么地方有下载的?
多谢



welcome66

职务:普通成员
等级:1
金币:0.0
发贴:5
注册:2001/5/14 14:58:38
#22001/5/17 16:14:20
如有例子,请EMAIL给我
多谢
EMAIL:WELCOME66@21CN.NET



zdm

职务:普通成员
等级:1
金币:0.0
发贴:38
注册:2001/5/11 11:15:43
#32001/5/17 16:14:24
不知道DirectMediaXtra可不可以



xie0909_5d

职务:普通成员
等级:1
金币:1.0
发贴:161
注册:2001/5/15 20:43:26
#42001/5/17 16:52:07
用a5wmme .ucd
i:=Random(1, 4, 1)
MIDIPlay(FileLocation^"midi\\midi"^i^".mid", 100, 0)
i:=i+1
if i>4 then
i:=1
end if


听着摇滚乐,喝着白开水。

寒冰

职务:普通成员
等级:1
金币:1.0
发贴:185
注册:2001/5/11 13:22:53
#52001/5/17 17:19:44
楼上是随机播放吧!



welcome66

职务:普通成员
等级:1
金币:0.0
发贴:5
注册:2001/5/14 14:58:38
#62001/5/17 17:29:16
楼上的楼上的程序是随机播放其中的一个文件,不能总是在循环播放的,即播放完一个后就不会再执行该图标了。我可是想在程序运行期间,一直都播放音乐的!



shadowgirl

职务:普通成员
等级:1
金币:0.0
发贴:113
注册:2001/1/9 15:02:55
#72001/5/17 17:30:48
前面不是有很多帖子吗?
不是用MIDILOOP函数吗?5.0以上都有啊



飞云江

职务:普通成员
等级:2
金币:2.0
发贴:289
注册:2001/5/11 15:38:25
#82001/5/17 18:19:05
我以前用过MIDILOOP函数,但是发现在编辑状态下试运行后返回编辑状态经常无法停止播放除非运行函数停止,而且打包后有时经常出现无声现象.请教?



nikee

职务:普通成员
等级:1
金币:0.0
发贴:3
注册:2001/5/15 22:17:34
#92001/5/17 18:20:14
我用的是5。1版本的,怎么没有这个函数?



飞云江

职务:普通成员
等级:2
金币:2.0
发贴:289
注册:2001/5/11 15:38:25
#102001/5/17 18:23:05
不是自带的,是外部函数