Desactivar microfono de la PC

[fide_uci]

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 !!!