文本到语音
问题描述：
我正在改进多年前创建的小型警报/提醒应用程序，并且我想每小时发一次嘟嘟声，但不要发出哔哔声，它会更好。 在DELPHI D2007或更高版本中有没有简单的方法可以做到这一点？ 感谢文本到语音
答
检查布赖恩龙教程的 Speech Synthesis & Speech Recognition Using SAPI 5.1
我用这个教程编写了一个文本语音软件。
当我按下CTRL 它读取剪贴板中的内容+ F10
答
在我的代码我使用MS Agent和TAgntSrvr组件： http://delphi.icm.edu.pl/ftp/d30free/agntsrvr.htm
您也可以围绕检查此link或只是谷歌：“文本语音德尔福”
答
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;
我们在该领域使用这种方法，没有问题，与xp/vista一起使用 – 2009-01-20 22:29:26