Fórum Sintetizar vóz #228634
28/04/2004
0
:? :? :? :?
Desde já agradeço.
[]s Thiago
Tnt_man
Curtir tópico
+ 0Posts
28/04/2004
Geisonc
Gostei + 0
28/04/2004
Tatuweb
uses ComObj; procedure TForm1.Button1Click (Sender: TObject); var Speech: OLEVariant; begin try Speech := CreateOLEObject (´SAPI.SpVoice´); Speech.Speak (´ClubeDelphi: o melhor fórum sobre Delphi!´, 0); except on EOLESysError do ShowMessage (´Não é possível iniciar Microsoft Speech!´); end; end;
Gostei + 0
05/04/2006
Steve_narancic
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)