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

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

Postby Enrrique Vertiz » Wed Oct 03, 2007 3:39 am

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
Enrrique Vertiz
 
Posts: 541
Joined: Fri Oct 07, 2005 2:17 pm
Location: Lima - Peru

Postby Loren » Wed Oct 03, 2007 8:07 am

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
Loren
 
Posts: 479
Joined: Fri Feb 16, 2007 10:29 am
Location: Cadiz - España

Postby Biel EA6DD » Wed Oct 03, 2007 8:37 am

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


Code: Select all  Expand view  RUN
LOCAL oVoice := tOleAuto():New( "Sapi.SPVoice" )
oVoice:Speak( "Hello" )
Saludos desde Mallorca
Biel Maimó
http://bielsys.blogspot.com/
User avatar
Biel EA6DD
 
Posts: 682
Joined: Tue Feb 14, 2006 9:48 am
Location: Mallorca

Postby Enrrique Vertiz » Wed Oct 03, 2007 1:38 pm

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
Enrrique Vertiz
 
Posts: 541
Joined: Fri Oct 07, 2005 2:17 pm
Location: Lima - Peru

Postby karinha » Wed Oct 03, 2007 2:27 pm

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


Code: Select all  Expand view  RUN
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
karinha
 
Posts: 7856
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Postby Biel EA6DD » Thu Oct 04, 2007 8:59 am

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
Biel EA6DD
 
Posts: 682
Joined: Tue Feb 14, 2006 9:48 am
Location: Mallorca

Postby karinha » Thu Oct 04, 2007 12:22 pm

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
karinha
 
Posts: 7856
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Postby A&C » Thu Oct 04, 2007 9:02 pm

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

Postby A&C » Sat Oct 06, 2007 1:07 pm

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

Postby cuatecatl82 » Tue Oct 09, 2007 4:20 pm

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
cuatecatl82
 
Posts: 625
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México

Postby karinha » Wed Oct 10, 2007 4:16 pm

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7856
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Postby cuatecatl82 » Sat Oct 13, 2007 3:41 pm

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.
User avatar
cuatecatl82
 
Posts: 625
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 43 guests

cron