Tema: Speaker
Ver Mensaje Individual
  #1  
Antiguo 26-08-2007
Khronos Khronos is offline
Miembro
 
Registrado: abr 2007
Posts: 298
Reputación: 18
Khronos Va por buen camino
Speaker

Este truco es una tonteria pero sirve para reirte un poco, haber que nos dice nuestro amigo Bill xDDD.

Código Delphi [-]
uses Comobj;

procedure TForm1.Button1Click(Sender: TObject);
var
  Bill: OLEVariant;
begin
  Bill := CreateOLEObject('SAPI.SpVoice');
  Bill.Speak('Go Vista go', 0);
end;

Salu2
Responder Con Cita