Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Ayuda Con Una Variable Por Favor...!
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Ayuda Con Una Variable Por Favor...! 
 
   Tengo una aplicación en la que incluí un ejemplo de voz con espeak, tengo dos botones, "Play" y "Stop"
Para reproducir en voz el texto de un TextArea, y "Stop" para detenerlo. Hasta ahí todo va bien:

Public Sub play_Click()
  If play_Click = Boolean Then    
 Exec ["espeak", "-ves", "-s" & Str$(Slider1.value), TextArea1.text]
End

Public Sub stop_Click()
Shell "killall -SIGTERM espeak"
End


Ahora, necesito (no sé como hacerlo     ) una variable para que, si presiono más de una vez PLAY, espeak vuelve a iniciar la lectura aunque no halla terminado la primera vez, quiero anular la órden de PLAY si es que se presiona el botón de nuevo mientras éste aún está hablando.

Gracias...  
 



 
Atacar - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Ayuda Con Una Variable Por Favor...! 
 
Leete esto: http://cursogambas.blogspot.com.es/...-en-gambas.html
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Ayuda Con Una Variable Por Favor...! 
 
Hola atacar.

Atacar escribió: [Ver mensaje]
   Tengo una aplicación en la que incluí un ejemplo de voz con espeak, tengo dos botones, "Play" y "Stop"
Para reproducir en voz el texto de un TextArea, y "Stop" para detenerlo. Hasta ahí todo va bien:


Public Sub play_Click()
  If play_Click = Boolean Then    
 Exec ["espeak", "-ves", "-s" & Str$(Slider1.value), TextArea1.text]
End

Public Sub stop_Click()
Shell "killall -SIGTERM espeak"
End
 


Pregunta.¿ Por que usas una variable booleana en play_clcik ?.  play_click es un botón.
Cada vez que pulses en el botón play_Click se debe ejecutar lo que hay dentro.

Citar:

Ahora, necesito (no sé como hacerlo     ) una variable para que, si presiono más de una vez PLAY, espeak vuelve a iniciar la lectura aunque no halla terminado la primera vez, quiero anular la órden de PLAY si es que se presiona el botón de nuevo mientras éste aún está hablando.


En gambas usamos los procesos.

Es un tema un poco mas avanzado pero puedes verlo en el manual de gambas en la pagina 125. Gestión de procesos.
Si ya has usado Shell ya has comenzado a ver parte del tema. De todas manera tu lo estas haciendo casi bien con comandos de Shell.

Ejemplo:

Si no se esta hablando
- Hablar
- hablando = verdadero
Si no es así
- matar proceso
- espera (wait 0.5)         'Juega con esto, quítalo y ponlo.Busca que hace exactamente esto.
- hablar
Fin de si

Puedes hacer todo eso en un botón. Tienes que aprender que es una condicional.

Ahora te hago una pregunta a modo de ejercicio.
Si tuvieras una caja de texto que es la que le dices a espeak lo que debes escribir.
¿ Como harías para que hablase si la caja de texto tiene contenido o no ?.
Y naturalmente añade que si se esta hablando debe parar y empezar de nuevo.

Con eso habrás aprendido mas sobre las condicionales, a usar un operador lógico y a mejorar tu aplicación.


Saludos.
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
última edición por Shell el Viernes, 23 Noviembre 2012, 11:01; editado 4 veces 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Ayuda Con Una Variable Por Favor...! 
 
Hola, yo controlaria con eventos el boton, algo asi:

Public hProceso As Process

Public Sub play_Click()
    
    hProceso = Exec ["espeak", "-ves", "-s", ""] As "hProceso"
    play.Enabled = False
End

Public Sub stop_Click()
    Shell "killall -SIGTERM espeak"
End

Public Sub hProceso_Kill()

    play.Enabled = True
  
End

 


Cada vez que mates al proceso automaticamente se va a llamar a la funcion hProceso_Kill()

De paso te digo que no es lo mejor matar a espeak asi (el usuario podria estar usandolo para otra cosa o en otra instancia de tu programa)
yo lo haria asi:

Public Sub stop_Click()
  Try hProceso.Kill()
End

 


Saludos.


(postdata a los admins: No funciona la indentacion cuando pegas codigo entre [code] :O )

(segunda postdata: No funciona solo en la vista previa, despues si :D)
 



 
última edición por Enchufadoo el Sabado, 24 Noviembre 2012, 22:00; editado 1 vez 
Enchufadoo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Ayuda Con Una Variable Por Favor...! 
 
Off topic
 Enchufadoo: [Ver mensaje]

(postdata a los admins: No funciona la indentacion cuando pegas codigo entre [code] :O )

(segunda postdata: No funciona solo en la vista previa, despues si :D)


Ok, lo reviso. Gracias
 




===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"
 
jguardon - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Por Favor Me Pueden Ayudar Con La Forma De... anahaga General 2 Domingo, 21 Febrero 2010, 21:49 Ver último mensaje
anahaga
No hay nuevos mensajes Un Cronómetro, Por Favor shordi General 4 Jueves, 06 Febrero 2014, 20:35 Ver último mensaje
shordi
No hay nuevos mensajes Variable Global Contra Variable Por Refere... Shell General 2 Martes, 28 Octobre 2014, 10:36 Ver último mensaje
jsbsan
No hay nuevos mensajes ¿Estás A Favor O En Contra De... Abort( ) ? vuott Aplicaciones/Fragmentos de Código 4 Miercoles, 30 Noviembre 2016, 12:48 Ver último mensaje
v3ctor
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron