|
|
主题: 暂停与播放按钮
|
hunterlin
职务：普通成员
等级：1
金币：0.0
发贴：36
注册：2001/5/26 13:25:51
|
#12001/12/17 21:50:42
播放midi音乐，只有一个按钮，要实现两种功能：播放与暂停。本人知道用checked来实现，但不知如何进行。
|
greelu
职务：普通成员
等级：1
金币：1.0
发贴：139
注册：2001/10/31 14:15:30
|
#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
注册：2001/5/17 23:14:57
|
#32001/12/19 20:30:24
要用到外部扩展函数UCD的。
[url]http://sintian.chinaccd.net[/url]
|
yxwgm
职务：普通成员
等级：1
金币：0.0
发贴：15
注册：2001/5/18 15:26:07
|
#42001/12/21 8:01:58
用到一个midiloop.u32的外部函数。
|
