Como colocar o c�digo ?

Question

Minha d�vida � o seguinte como fasso para colocar esse codigo no meu programa quais sa� as estapas para isso ?

At� +

procedure TForm1.Button1Click(Sender: TObject);
var
texto : string;
voz: OLEVariant;
begin
texto := edit1.Text;
voz := CreateOLEObject (�SAPI.SpVoice�);
voz.Speak (texto, 10);
end;

Peninha · Answer

Bem amigo, pelo que parece, este c�digo foi criao para um evento Onclick de um bot�o, portanto vc deve coloca-lo dentro do mesmo evento do bot�o que vc determinar.
Espero ter te ajudado.
Qualquer coisa posta ai.

Warfighter · Answer

[quote:19cb31f6cd=�peninha�]Bem amigo, pelo que parece, este c�digo foi criao para um evento Onclick de um bot�o, portanto vc deve coloca-lo dentro do mesmo evento do bot�o que vc determinar.Espero ter te ajudado.Qualquer coisa posta ai.[/quote:19cb31f6cd]O delphi est� acusando erro nesse codeo que devo fazer ?Tipo eu adicionei o bot�o e o edit que ele estva pedindo e o  ele est� pedindo dessa vez ? [code:1:19cb31f6cd]voz := CreateOLEObject (�SAPI.SpVoice�);[/code:1:19cb31f6cd]...

F�rum Como colocar o c�digo ? #347239