主题:  暂停与播放按钮

hunterlin
职务：普通成员
等级：1
金币：0.0
发贴：36
#12001/12/17 21:50:42
播放midi音乐，只有一个按钮，要实现两种功能：播放与暂停。本人知道用checked来实现，但不知如何进行。



greelu
职务：普通成员
等级：1
金币：1.0
发贴：139
#22001/12/18 9:07:46
设定一个变量(我这里用的是midi)先调用LoopMidi(FileLocation^"路径名"^midifile^".mid")
使用loopmidi&stopmidi来实现播放和停止
if midi=1 then
midi:=0
StopMidi()
else
midi:=1
LoopMidi(FileLocation^"路径名"^midifile^".mid")
end if



困龙在天
职务：普通成员
等级：7
金币：10.0
发贴：2942
#32001/12/19 20:30:24
要用到外部扩展函数UCD的。


[url]http://sintian.chinaccd.net[/url]

yxwgm
职务：普通成员
等级：1
金币：0.0
发贴：15
#42001/12/21 8:01:58
用到一个midiloop.u32的外部函数。