Text to speech

Question

I am improving a small alarm/reminder application that I build years ago, and I would like to do an hourly beep, but instead of beeping it would be much nicer it would tell time. Is there any simple way to do this in DELPHI D2007 or later? Thanks

Answer 1

In my code I use MS Agent and TAgntSrvr component: http://delphi.icm.edu.pl/ftp/d30free/agntsrvr.htm

Also you can check this link or just Google around: "text speech delphi"

Answer 2

Check Brian Long tutorial's Speech Synthesis & Speech Recognition Using SAPI 5.1

I wrote a text to speech software using this tutorial.

It reads the content of Clipboard when I press CTRL+10

Answer 3

Further to Jlouro's question, is there any nice text to speech that ends up giving actual British accent? It's quite easy to get the American default in Windows.... Bri

Answer 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;

Answer 5

I did a video awhile back on making your applications talk in Delphi. I personally haven't ever found a use for text to speech in one of my applications, but it's a fun thing to know how to do ;-)