您的位置:首页 >> 数据库 >> 数据库其它 >> 正文
RSS
 

制作会出声的按扭

http://www.rdxx.com 06年07月31日 08:22 PB能量建造者 我要投稿

关键词: 按扭

关键:WindowsAPI函数:sndPlaySoundA和waveOutGetNumDevs
  新建标准(Standard)用户自定义对象(user object)uo_command,在“Select Standard Visual Type”框中选择“commandbutton”。
  在用户对象中,
  1)定义Local External Functions,主要用到了两个API函数:sndPlaySoundA和waveOutGetNumDevs。
Function boolean sndPlaySoundA (string SoundName, ulong Flags) Library "WINMM.DLL"
Function ulong waveOutGetNumDevs () Library "WINMM.DLL"
  2)定义实例变量(Instance Variables):
string is_soundfile = default.wav,其中,“default.wav”为按扭默认发出的声音。
  3)定义用户事件:ue_setsoundfile(无须填事件ID),主要用于设置您需要播放的文件名,例如 : is_soundfile = xxx.wav ,按扭就播放文件名为 xxx.wav的声音文件。在用户在窗口中加入该控件(用户对象)时使用,以修改按扭的播放声音。
定义完以上几项后,在按扭的Clicked事件中写入:
//修改播放声音文件
This.TriggerEvent("ue_setsoundfile")
//开始播放Wav
ulong lul_numdevs
lul_numdevs = WaveOutGetNumDevs()
If lul_numdevs $#@62; 0 Then
sndPlaySoundA(is_soundfile, 1)
End If
  到此便大功告成。你只需在窗口中加入该对象,在ue_setsoundfile事件中写入is_soundfile = xxx.wav,会发声的按扭便OK了。

 
 
标签: 按扭 打印本文
 
 
  热点搜索
 
 
 



Valid XHTML 1.0 Transitional
Copyright ©2005 - 2008 Rdxx.Com,All Rights Reserved
收藏本页
收藏本站