delphi控制麦克风的音量

[Beauti2007]

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

[constantine]

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

[brightyang]

直接API
mciExecute(参数);

[Rex_love_Burger]

要用混音器(Mixer)编程,看以下函数:
mixerGetDevCaps
mixerOpen
mixerGetLineInfo
mixerGetLineControls
mixerSetControlDetails

首先打开混音器(mixerOpen),然后获取一个混音器上的Mic Controls(mixerGetLineControls),然后设置好结构体(其中包含音量),然后设置音量(mixerSetControlDetails),MSDN带有相关例子,自己看看吧.

[dooing]

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