• Domingo 22 de Diciembre de 2024, 19:04
« anterior próximo »
Páginas: [1]

Autor Tema:  Reproducir Sonidos  (Leído 3495 veces)

jomace

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Reproducir Sonidos
« en: Miércoles 10 de Noviembre de 2004, 01:00 »
0
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

hitman47

  • Miembro activo
  • **
  • Mensajes: 81
  • Nacionalidad: pa
    • Ver Perfil
    • http://softwareistmenio.blogspot.com
Re: Reproducir Sonidos
« Respuesta #1 en: Miércoles 10 de Noviembre de 2004, 04:38 »
0
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

LUKER

  • Miembro activo
  • **
  • Mensajes: 38
    • Ver Perfil
Re: Reproducir Sonidos
« Respuesta #2 en: Miércoles 10 de Noviembre de 2004, 15:56 »
0
;)  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:
Los limites estan en los ojos del hombre, los triunfos en sus mentes, de el es la decision de ser un ciego con fe o un vidente sin futuro

Atondo

  • Nuevo Miembro
  • *
  • Mensajes: 10
    • Ver Perfil
Re: Reproducir Sonidos
« Respuesta #3 en: Jueves 11 de Noviembre de 2004, 00:01 »
0
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..
Atd

Atondo

  • Nuevo Miembro
  • *
  • Mensajes: 10
    • Ver Perfil
Re: Reproducir Sonidos
« Respuesta #4 en: Jueves 11 de Noviembre de 2004, 00:09 »
0
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).
Atd
Páginas: [1]
« anterior próximo »