[Delphi] Fazendo o aplicativo "falar"

[Ryokusei 28]

Neste artigo irei ensinar como utilizar a Speech API.

Speech API é um padrão programação que fornece as ferramentas e componentes para o reconhecimento de fala e texto para fala software aplicativos.

 

Vamos começar, inicie um projeto no Delphi e vá ao code editor e declare a unit "Comobj".

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Agora, insira no Form:

 

1 Label com Caption "Texto",

1 Edit com Text "" (em branco),

1 Button com Caption "Ouvir";

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Agora dê dois cliques no botão para ir ao evento OnClick dele, e insira o código:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Agora compile o projeto, digite algo (de preferência em inglês) no Edit, clique no botão "Ouvir" e veja o resultado.

[bidoow 0]

aaaa, kinen a parada que já vem no windows :D

 

se voce coloca pra ele fala bido, ele fala bidoooow certinhu, asuHSUAHUAS

 

vlw:D

[matheusguerra 3]

legal, talvez me ajude

:D ^^

[rychardsson 0]

hahahahahahaha

q legal

comessei gostar de delphi

muito loco

agora meu pc fla em ingles

A ele nao fala em portugues nao:confused:

[Adeuk 1]

Tinha um jeito bem mais facil /HUM

 

Mas né...

 

Bom tuto :D

[Ryokusei 28]

hahahahahahaha

q legal

comessei gostar de delphi

muito loco

agora meu pc fla em ingles[/font]

A ele nao fala em portugues nao:confused:

 

Isso depende do pacote de voz instalado, por padrão é em inglês. Se quiser mais pacotes baixe no site da Microsoft.

[DarkSj 0]

n tenqe adc uma variavel

o meu da erro -'-

[lucas98 1]

muito bom cara eu consigo faser ele falar em outra lingua sabe por exemplo

 

voce escreve carro em portugues e ele fala em japones sabe se quiser eu posto o codigo depois

 

vlw

 

manolo

[~Cleyton 91]

Ola man olha otimo topico ate tirei umas duvidas minhas...estou tentando ser mais avançado no delphi continue assim ^^by

[dargains 1]

Eu vou baixar outro pacote mais tem como vc me dizer como eu isntalo?

[Ryokusei 28]

Eu vou baixar outro pacote mais tem como vc me dizer como eu isntalo?

 

Não sei pq nunca instalei. Se você me passar o link do pacote posso tentar aqui e te dizer como fiz.

[DarkSj 0]

n consegui tipo

da erro ali:

var voz: OLEVariant;

begin

voz:=CreateOLEObject('SAPI.SpVoice');// ali da erro!

voz.Speak(Edit1.Text, 0);

end;

 

n sei oqe é isso me ajudem :D

[Ryokusei 28]

n consegui tipo

da erro ali:

 

 

n sei oqe é isso me ajudem :D

 

Verifique se vc declarou a unit "ComObj".

[DarkSj 0]

e como faz isso?

tipo eu boto 2 pontos ou oqe ?

[Ryokusei 28]

e como faz isso?

tipo eu boto 2 pontos ou oqe ?

 

Na seção uses, apenas declare essa unit.

 

Vao ser algo como:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se