none
Crear alarma que no deje de sonar RRS feed

  • Pregunta

  • Buenas,disculpen tengo una consulta, quiero crear una alarma que suene de forma indefinida hasta que yo la cancele con un boton, lo que ocurre es que si lo coloco en un ciclo while, esta si suena de forma indefinida pero se bloquean todos los botones del formulario, les agradeceria cualquier idea o sugerencia que podrian darme.
    jueves, 28 de septiembre de 2017 21:04

Respuestas

  • Hola Xavier, yo utilizaría un tímer, dentro llamaría al audio de mi pc para ejecutar el sonido que tengo en Recurces en el mismo button de activación de la alarma una pondría el paro del play ej: En el button colocamos por defecto en Text= "Alarma" si se ejecuta activa el timer y el button pasa a tener el Text= "Activa"

     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    
            If Button1.Text = "Activa" Then
                    Timer1.Enabled = False
                    My.Computer.Audio.Stop()
                    Button1.Text = "Alarma"
                    Stp = False
                Else
                    Stp = True
                    Timer1.Enabled = True
                    Button1.Text = "Activa"
    
                End If
    
        End Sub

    en el timer

      Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick    
                If Stp = False Then
                    Timer1.Enabled = False
                End If
                My.Computer.Audio.Play(My.Resources.Alarma, AudioPlayMode.BackgroundLoop)
        End Sub

    Como ves en el mismo boton tenemos la opción de activar y desactivar la alarma, en mi caso el archivo de audio de Recurce se llama Alarma, recuerda que para vb net solo acepta archivos .WAV Con este ejemplo puedes trabajar con el resto de la aplicación sin problemas ya que el timer en definitiva es un hilo independiente del proceso. Colocas en Interval del timer como convenga, en mi caso 100

    Saludos

    viernes, 29 de septiembre de 2017 3:32