当鼠标移动到一个button,edit等控件上时候,会发卡卡的声音,
按下按钮的时候也会发声
请问这种效果怎么做?是不是在button 的onmouseup的事件里添加发声程序

解决方案 »

  1.   

    在button,edit的onMouseMove中寫事件﹕
    beep;\\響鈴
      

  2.   

    beep是声卡发声windows.beep是喇叭发声
      

  3.   

    呵呵,beep有个外号叫穷人的调试器
      

  4.   

    是发出我事先做好的声音.wav 或.mp3格式的声音
      

  5.   

    用hook,可以让所有的程序都具有这样的功能。
    发声 引用MMSystem单元
    sndplaysound('d:\fail.wav',SND_ASYNC);发出声音
      

  6.   

    "beep有个外号叫穷人的调试器" 好. 你也可以用AHM控件
      

  7.   

    kiboisme(还是铁棒.....针)
    能详细说下吗?
    我明白你的意思了,但是具体怎么做啊
      

  8.   

    AHM
    是什么在delphi7的什么地方?
      

  9.   

    sndplaysound('d:\fail.wav',SND_ASYNC);发出声音
    [Error] Unit1.pas(56): Undeclared identifier: 'sndplaysound'
    怎么回事
      

  10.   

    但鼠标移到控键上时:
    temp:=extractfilepath(application.exename)+'ring.wav';
    playsound(pchar(temp),0,SND_ASYNC or SND_LOOP);
    但鼠标离开控键时:
    playsound(pchar(temp),0,SND_PURGE);
    可以事先自己随便录制一段音乐,很简单吧?给分吧!