FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para CA-Clipper Controlar el Volumen de sonido con Auxsetvol() y AuxGetVol()
Posts: 12
Joined: Thu Aug 31, 2006 06:25 PM
Controlar el Volumen de sonido con Auxsetvol() y AuxGetVol()
Posted: Tue Sep 05, 2006 10:16 PM

Sigo utilizando: Fw24+Clipper53+Blinker5.0.

Estoy desarrollando un gestor multimedia y tengo el siguiente problema que ya estoy 2 dias con el. Funciona todo correctamente, Videos, MP3, Imagenes, Etc, EXCEPTO las funciones del control del sonido AuxSetVol() y AuxGetVol(), no logro poder que funcione para poder aumentar y disminuir el sonido.

¿ Funcionan correctamente? ¿ en el caso que no funcionen, alguien podria crear un ejecutable con un fichero INI con harbour para poder controlar el sonido aunque sea desde otro programa ? ( el INI seria solo para que almacene el sonido actual, aumentar y disminuir el sonido en funcion de los paramentros que yo grabe en ese ini ).

Muchas gracias anticipadamente.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Controlar el Volumen de sonido con Auxsetvol() y AuxGetVol()
Posted: Wed Sep 06, 2006 07:53 AM

Javier,

Si buscas en fw\samples\mmedia*.prg por AuxSetVol encontrarás varios ejemplo de uso. Revísalos por si te sirven de ayuda.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 12
Joined: Thu Aug 31, 2006 06:25 PM
Control de sonido:
Posted: Wed Sep 06, 2006 06:48 PM

Antonio:

Antes de mandar el mensaje ya busque y comprobe todos los ejemplos y documentacion respectos a temas multimedia. Los ejemplos de \MMEDIA funciona todo excepto el control de volumen.

Lo unico que si no comente es que corro el programa en XP.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Controlar el Volumen de sonido con Auxsetvol() y AuxGetVol()
Posted: Wed Sep 06, 2006 07:01 PM

Javier,

Con que parámetros estás llamando a AuxSetVol() ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 12
Joined: Thu Aug 31, 2006 06:25 PM
Controlar el Volumen de sonido con Auxsetvol() y AuxGetVol()
Posted: Tue Sep 12, 2006 09:53 AM

Antonio:

Respecto a las pruebas sobre el volumen todavia no lo he implementado en mi programa porque en las pruebas de \mmedia\avivideo.prg no funciona.

El codigo de pruebas es:

REDEFINE SCROLLBAR oSBRight ID 130 RANGE 0,32 ;
ON UP (AuxGetVol(5,@nVolL,@nVolR),;
AuxSetVol(5,if(nVolL<63000,nVolL+2040,nVolL),nVolR),;
AuxGetVol(5,@nVolL,@nVolR),;
oTextLV:SetText(Str(nVolL)),oTextRV:SetText(Str(nVolR)) ) ;
ON DOWN (AuxGetVol(5,@nVolL,@nVolR),;
AuxSetVol(5,if(nVolL>2040,nVolL-2040,nVolL),nVolR),;
AuxGetVol(5,@nVolL,@nVolR),;
oTextLV:SetText(Str(nVolL)),oTextRV:SetText(Str(nVolR)) ) OF oDlg

Gracias de antemano.

Continue the discussion