Bueno Neftali, el link que me das esos codigos me trabajan de (
http://www.swissdelphicenter.ch/en/showcode.php?id=225) maravillas lo unico que no se como poner el microfono en esta linea.
Código Delphi
[-]if GetVolumeControl(MyMixerHandle, MIXERLINE_COMPONENTTYPE_DST_SPEAKERS,
MIXERCONTROL_CONTROLTYPE_VOLUME, MyVolCtrl) then
He probado con
MIXERLINE_COMPONENTTYPE_DST_WAVEIN
y con
MIXERLINE_COMPONENTTYPE_DST_VOICEIN
Pero ninguno de los 2 me baja el volumen, pero bueno tengo que tener un microfono, cuando confirme les digo.
Gracias de todas formas !!!