2009-01-20 5 views
6

J'améliore une petite application d'alarme/de rappel que je construis il y a des années, et je voudrais faire un bip horaire, mais au lieu de biper, il serait beaucoup plus agréable de dire l'heure. Existe-t-il un moyen simple de faire cela dans DELPHI D2007 ou plus tard? MerciText to speech

Répondre

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

nous utilisons cette méthode dans le domaine, pas de problèmes, fonctionne avec xp/vista –

+0

J'ai utilisé le code ci-dessus, il ne fonctionne pas dans Vista. Mais avec le composant SpVoice dans le tutorat de Brian Long, cela fonctionne bien. – samir105

2

Je l'ai fait un certain temps vidéo de retour sur making your applications talk à Delphes. Personnellement, j'ai jamais trouvé une utilisation pour le texte à la parole dans l'une de mes applications, mais il est une chose amusante à savoir comment faire ;-)

0

Vous pouvez utiliser eSpeak avec Delphi pour soutenir plus de langues et Mac (et avec optimisme Linux dans le futur). L'exemple Delphi est here.