Fórum painel de controle windows #410378
09/12/2011
0
Essa procedure abaixo converte o texto de Memo1 em áudio.
procedure TForm1.Button1Click(Sender: TObject);
var
texto: string;
voz: OLEVariant;
begin
Texto:=Memo1.Text;
voz := CreateOLEObject (SAPI.SpVoice);
voz.Speak(texto, 0);
end;
end.
Seguinte, Se quero mudar o driver de fala, vou ao Menu Iniciar, configurações, Painel de controle, Fala e
seleciono o diver e a velocidade (isso no Windows)
Como faço para fazer isso pelo Delphi?..... Mudar o driver e controlar a velocidade?
Grato pela ajuda
Alexandre
Curtir tópico
+ 0Posts
09/12/2011
Leonardo Xavier
Gostei + 0
09/12/2011
Wilson Junior
Gostei + 0
09/12/2011
Jeferson Zonta
agora o drive não sei..
espero ter ajudado pelo menos um poco att.
Gostei + 0
09/12/2011
Alexandre
Grato pelas respostas.
Tentei o som desse geito e deu pau.
Tentei tb voz.speed:=100 e tb nao deu.
O problema não está na fonética... Isso resolvi.
O que preciso é fazer o Delphi ir buscar o arquivo de voz sozinho sem
ter que ir lá em Configurações\fala\etc..
Grato pela ajuda
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)