TTS Help

[shirazamod]

I need help with the following code:

'Needs reference to Microsoft Speech Object Library
Dim Speaker As New SpeechLib.SpVoice
Private Sub Command1_Click()
Speaker.Speak "Hello there, how are you feeling? I am feeling very good right now, my processor is really running at top speeds!"
End Sub

With the above code, if you have a button called 'Command1' and you click it you will see that the form freezes as it speaks the text. My question is whether it is possible to use text-to-speech without freezing the form when reading the text, because I want to make it read entire documents.
Thanx 4 ne help,

[shirazamod]

Doesn't anyone know??

[wiz126]

you can make it read all the text you want at once.
you can also make another form with the options to stop it pase it and so one.

if you don't want your form to freez you might wona put the control in another form and that will not freez your original form

[umilmi81]

That's really cool. I didn't know about the speech processor.

There is a flag in the speak call that allows it to execute asynchronously.

Try this.

Public Speaker As New SpeechLib.SpVoice
 
Speaker.Speak "Put some string", SVSFlagsAsync

You can use Speaker object to pause it and do other things. Be sure to make speaker a public global object otherwise the speech stops as soon as the object goes out of scope.