How to speak your PC./ como hacer hablar tu pc.

[luisvasquezcl]

Hi, this is the code:

#include <minigui.ch>
Function Main
oVoz = CreateObject("SAPI.SpVoice")
oVoz:Speak("Harbour Minigui")
oVoz:Speak("La mejor libreria GUI")
oVoz:= NIL
Return nil

works with Windows XP SP2 that is my setup, I do not know if it works with
other versions.
Tested and works well .... Enjoy
Best regards,
Luis Vasquez

[Vanguarda]

Hi friend,

WOW.... very very nice, thank for share this nice function.

It´s work on WIN7 Ultimate

My best regards,

[Roberto Lopez]

Hi, this is the code:

#include <minigui.ch>
Function Main
oVoz = CreateObject("SAPI.SpVoice")
oVoz:Speak("Harbour Minigui")
oVoz:Speak("La mejor libreria GUI")
oVoz:= NIL
Return nil

works with Windows XP SP2 that is my setup, I do not know if it works with
other versions.
Tested and works well .... Enjoy
Best regards,
Luis Vasquez

Very nice

It works in XP-SP3 too.

[sudip]

Hello Luis Vasquez,

Thanks a lot
It works for me also. It can be used as error message !!!!

I just created a small funny sample with your code. Have fun

Code: Select all

#include "minigui.ch"

Function main()
   
   define window winMain at 0, 0 width 400 height 300 title "Voice Testing" main
   
      @ 10, 10 label label_1 value "Enter Test:"
      @ 50, 10 editbox edit_1 width 380 height 180
      @ 240, 150 button button_1 caption "Speak Now" action SpeakIt(winMain.edit_1.value)  
   
   end window
   
   winMain.center
   winMain.activate
   
   return  nil
   

Function SpeakIt(cString)
   oVoz = CreateObject("SAPI.SpVoice")              
   oVoz:Speak(cString)
   oVoz:= NIL
   return nil

With best regards.

Sudip

[Vanguarda]

Hi friends,

SUDIP, nice code, Very fun . Thanks for sharing.

My best regards,

[Rathinagiri]

Ha Ha!

Super! It is just that easy!? Great.

[mustafa]

Hello here I leave a hos old Clipper program to play melodies
is the version compiled with xHarbour console mode.
HMG and converted into work, so never dies Clipper
A Greeting

Hola aquí hos dejo un viejo programa de Clipper para tocar melodias
está la versión compilada con xHarbour modo consola.
Reconvertido en HMG y funciona , por lo tanto Clipper nunca Muere
Un Saludo

Mustafa

[mustafa]

Here I leave a screenshot of Clipper

[jucar_es]

al compilarlo me genera el error

funcion indefinida speak

GRACIAS

[mol]

Fine works!
Thanks Luis and Sudip.

But Polish language sounds very poor