delphi控制麦克风的音量

各位大侠:
    我想通过Trackbar控件来调节麦克风的音量,同样用Trackbar控件控制总音量已经实现,但控制麦克风音量还无法做到.最近一直在看这方面的资料，可效果欠佳,恳请各位大侠帮忙.

解决方案 »

  1.   

    要用混音器(Mixer)编程,看以下函数:   
      mixerGetDevCaps   
      mixerOpen   
      mixerGetLineInfo   
      mixerGetLineControls   
      mixerSetControlDetails   
        
      首先打开混音器(mixerOpen),然后获取一个混音器上的Mic   Controls(mixerGetLineControls),然后设置好结构体(其中包含音量),然后设置音量(mixerSetControlDetails),MSDN带有相关例子,自己看看吧.
      

  2.   

    参考cnpack组件的音量控制控件的代码。代码直接去www.cnpack.org下，
    最新的要到他们的版本机上下才行
      

  3.   

    直接API
    mciExecute(参数);
      

  4.   

    参考TAudioMixer代码可以做到，98/Me/2000/2003/XP都没问题，但是好像Vista就不好使了。