Hay alguna funcion para emitir sonidos desde (x)Harbour-FWH

Post Reply
Enrrique Vertiz
Posts: 552
Joined: Fri Oct 07, 2005 2:17 pm
Location: Lima - Peru
Been thanked: 3 times
Contact:

Hay alguna funcion para emitir sonidos desde (x)Harbour-FWH

Post by Enrrique Vertiz »

Eso amigos, que el programa pueda emitir sonidos, algo asi como :
suena("Digite nuevamente") y la PC si tiene el sonido activado, "Hable" y diga lo enviado como parametro.
Gracias
Enrrique Vertiz Pitta
Lima-Peru
xHb 1.23.1026X, Fwh 24.09, BCC74, MySQL 8.0.X, SQLLIB 1.9m
Loren
Posts: 479
Joined: Fri Feb 16, 2007 10:29 am
Location: Cadiz - España

Post by Loren »

Compañero...

para que emita un pitido: msgbeep()

Si quieres que "hable" deberás grabar el sonido en un archivo con formato .wav y reproducirlo mediante la función SndPlaySound("tu_archivo.wav")

Un saludo.
LORENZO
User avatar
Biel EA6DD
Posts: 682
Joined: Tue Feb 14, 2006 9:48 am
Location: Mallorca
Contact:

Post by Biel EA6DD »

Para que el PC "hable" puedes usar SAPI ( Microsoft Speech API )


Code: Select all | Expand

 LOCAL oVoice := tOleAuto():New( "Sapi.SPVoice" )
 oVoice:Speak( "Hello" )
Saludos desde Mallorca
Biel Maimó
http://bielsys.blogspot.com/
Enrrique Vertiz
Posts: 552
Joined: Fri Oct 07, 2005 2:17 pm
Location: Lima - Peru
Been thanked: 3 times
Contact:

Post by Enrrique Vertiz »

Sres., gracias, una mezcla de ambos es lo que necesito, con nuestra voz y con la ayuda de la PC.
Ambos funcionan perfectamente.
Nuevamente gracias
Enrrique Vertiz Pitta
Lima-Peru
xHb 1.23.1026X, Fwh 24.09, BCC74, MySQL 8.0.X, SQLLIB 1.9m
User avatar
karinha
Posts: 7941
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil
Been thanked: 3 times
Contact:

Post by karinha »

Biel EA6DD wrote:Para que el PC "hable" puedes usar SAPI ( Microsoft Speech API )


Code: Select all | Expand

 LOCAL oVoice := tOleAuto():New( "Sapi.SPVoice" )
 oVoice:Speak( "Hello" )



Parabiéns Gabriel. Excelente!

Gabriel, como se haces, para que la lengua no sea INGLÉZA?

Si fueste en ESPAÑOL por ejemplo... És posible?
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
Biel EA6DD
Posts: 682
Joined: Tue Feb 14, 2006 9:48 am
Location: Mallorca
Contact:

Post by Biel EA6DD »

En teoria si se puede cambiar el idioma, y tambien la voz. Pero no tengo los ficheros necesarios. Intenta buscar en el MSN. Si encuentras alguna info, te agredecera la compartas por este medio.
Saludos desde Mallorca
Biel Maimó
http://bielsys.blogspot.com/
User avatar
karinha
Posts: 7941
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil
Been thanked: 3 times
Contact:

Post by karinha »

Biel EA6DD wrote:En teoria si se puede cambiar el idioma, y tambien la voz. Pero no tengo los ficheros necesarios. Intenta buscar en el MSN. Si encuentras alguna info, te agredecera la compartas por este medio.


Mira si ayuda:

http://scriptbrasil.com.br/forum/index. ... 9&t=106366

http://forum.imasters.com.br/index.php?showtopic=220880

http://forum.clubedelphi.net/viewtopic. ... e8ed6345a8
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
A&C
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Post by A&C »

amigos como se puede descargar SAPI,,, y algun ejemplo practico de como aplicarla e instalarla...


GRACIAS
Mi segundo amor es Programar
User avatar
A&C
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Post by A&C »

Alguien Sabe:::
Mi segundo amor es Programar
User avatar
cuatecatl82
Posts: 625
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México
Contact:

Post by cuatecatl82 »

Hola Colegas del Foro:

Desafortunadamente no he conseguido hacer que la pc hable en Español, he instalado SAPI 5.0 y los paquetes de lenguaje, los cuales son el Ingles, El Chino Simplificado y el Japones, Solo la Versión de SAPI 4.0 y posteriores esta disponible al Español, pero no es compatible con windows XP y Vista, de hecho las dos versiones del SAPI se pueden instalar y funcionan mediante programas de terceros, pero no desde Xhabour... si les interesa les dejo unos links y revisen, por ahi puede que alguien encuentre respuesta.

http://www.microsoft.com/downloads/deta ... layLang=en

http://www.htmlbible.com/MicrosoftSpeechComponents/

http://www.mvp-access.com/buho/agentes.htm

Que lastima que mocosoft solo se preocupe por el lenguaje ingles y no por el habla español para la realización de utilidades como estas..

Si alguien encuentra la solución no duden en comentarla, vale la pena.

Saludos..
User avatar
karinha
Posts: 7941
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil
Been thanked: 3 times
Contact:

Post by karinha »

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
cuatecatl82
Posts: 625
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México
Contact:

Post by cuatecatl82 »

Saludos de nuevo colegas del foro:

Buscando por la red encontre algo que podría semejarse o acercarse a la petición de todos nosotros de este post.

Se trata de agregar un asistente animado con motor de voz en español como el "clip" que se ve en office, solo es cuestion de probar y adquidir una librería OCX de terceros, de hecho biene con una de prueba.

Excelente trabajo de Juan Carlos Salinas Ojeda y mi estimado amigo William Morales, ambos un equipo de trabajo nuevo y que augura excelentes resultados y aportaciones a esta maravillosa herramienta de programación.

Saludos a ambos y gracias por todo..

Prueben este enlace y comenten sus resultados, se van a quedar de a 4 :shock: como yo..


http://incos...net/fivewin/tmsagent32.htm


Me cae que Fivewin y Xharbour son la 8 Mavarilla, sabiendola explotar al máxico se pueden lograr cosas asombrosas como estas..

Nos escribimos pronto... y ya saben: comenten, comenten.
Post Reply