2009-01-20 12 views
6

Estoy mejorando una pequeña aplicación de alarma/recordatorio que construí hace años, y me gustaría hacer un pitido cada hora, pero en lugar de pitidos sería mucho mejor que dijera la hora. ¿Hay alguna manera simple de hacer esto en DELPHI D2007 o posterior? GraciasTexto a voz

Respuesta

4
uses 
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
    Dialogs, StdCtrls, ComObj; 

[...]

procedure TForm1.Button1Click(Sender: TObject); 
var 
    Voice: Variant; 
begin 
    Voice := CreateOLEObject('SAPI.SpVoice'); 
    Voice.speak('Hello World'); 
end; 
+0

utilizamos este método en el campo, sin problemas, funciona con xp/vista –

+0

Utilicé el código anterior, no funciona en Vista. Pero con el componente SpVoice en Brian Long tutoriat funciona muy bien. – samir105

2

hice un video hace un tiempo atrás en making your applications talk en Delphi. Yo personalmente no he que se ha encontrado un uso para el texto en voz en una de mis aplicaciones, pero es una cosa divertida de saber cómo hacer ;-)

0

Usted puede utilizar eSpeak con Delphi para apoyar a más idiomas y Mac (y con suerte Linux en el futuro). El ejemplo de Delphi es here.

Cuestiones relacionadas