Desactivar microfono de la PC

[fide_uci]

Ese del microfono me dice.
Error call to undefined os function.

Que puede ser eso ??

[fide_uci]

Es decir: Le mensaje de error dice.

A Call to an OS function failed cuando pongo esto.

Código Delphi [-]
mmMixSetMute(MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE, True);

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

[delphi.com.ar]

Empezado por fide_uci

Es decir: Le mensaje de error dice.

A Call to an OS function failed cuando pongo esto.

Código Delphi [-]
mmMixSetMute(MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE, True);

Fíjate en que línea de la función mmMixSetDetail es que falla, para tener mas información.

Saludos!

[fide_uci]

El error lo muestra en esta linea.

(Linea 49 de la Unit MMUtils)

if mixerGetLineInfo(hMix, @mxl, MIXER_GETLINEINFOF_COMPONENTTYPE) = MMSYSERR_NOERROR then

y de ahi salta para esta linea (de MMUtils)

RaiseLastMMError; (Linea 70)