SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: jomace en Miércoles 10 de Noviembre de 2004, 01:00

Título: Reproducir Sonidos
Publicado por: jomace en Miércoles 10 de Noviembre de 2004, 01:00
hola

mi aplicacion es muy simple y quiero darle vida, y pense en un sonido que se reproduciera cada vez que se mueva el mouse por un boton y al cargar un formulario....


me pueden ayudar
Título: Re: Reproducir Sonidos
Publicado por: hitman47 en Miércoles 10 de Noviembre de 2004, 04:38
hola para insertar sonido creo q puedes usar DirectSound o no se si existe algun control ocx o una API q permita hacerlo ya q hay una para insertar AVIs. por la red hay ejemplos de reproductores en VB solo busca en Google o en otro buscador.

                                                              SALU2! :D
Título: Re: Reproducir Sonidos
Publicado por: LUKER en Miércoles 10 de Noviembre de 2004, 15:56
;)  Amigo te recomiendo que carges o utilices algun componente de sonido, los clasicos de siempre, es mas hay un ejemplo  en el ms, despues llama o tu archivo pero cargalo desde el focus para que cada vez que hagas algo sobre el que contiene el focus se reprodusca tu sonido. :rolleyes: tambien puedes usar windows media y lo dejas invisible y lo activas cuando hagas x tarea  :smartass:  Bueno es una idea no :kicking:
Título: Re: Reproducir Sonidos
Publicado por: Atondo en Jueves 11 de Noviembre de 2004, 00:01
Esto es muy practico...Pruebalo...

declarar esto en un modulo...
Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
        (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long


asi lo mandas llamar en cualquier lugar (al entrar al form o al pasar por un boton)

Call sndPlaySound(App.Path + "\mensaje.wav", SND_ASYNC +SND_LOOP) 'activas
Call sndPlaySound(ByVal "", 0) ´desactivas

Nota: el sonido puede ser el que tu quieras.. solo cambia el nombre y ya esta..
Título: Re: Reproducir Sonidos
Publicado por: Atondo en Jueves 11 de Noviembre de 2004, 00:09
perdon me faltaron indicar  estas variables...

Const SND_ASYNC = &H1 'modo asíncrono. La función retorna una vez iniciada la música (sonido en background).

Const SND_LOOP = &H8 'La música seguirá sonando repetidamente hasta
                          'que la función sndPlaySound sea llamada de nuevo con un valor nulo para NombreWav (NULL).