Question

我正在改进我几年前建立的小型警报/提醒应用程序，我想每小时发出一次哔哔声，但不会发出嘟嘟声，它会更好地告诉时间。在DELPHI D2007或更高版本中有没有简单的方法可以做到这一点？感谢

Answer 1

检查Brian Long教程 Speech Synthesis & Speech Recognition Using SAPI 5.1

我使用本教程编写了一个文本到语音软件。

当我按 CTRL + F10

时，它会读取剪贴板内容

Answer 2

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 3

我在Delphi的making your applications talk上做了一段时间的视频。我个人在我的一个应用程序中没有找到用于文本到语音的用法，但知道该怎么做是件有趣的事情; - ）

Answer 4

在我的代码中，我使用MS Agent和TAgntSrvr组件： http://delphi.icm.edu.pl/ftp/d30free/agntsrvr.htm

此外，您可以查看link或仅查看Google：“text speech delphi”

Answer 5

您可以使用Delphi中的 eSpeak 来支持更多语言和Mac（以及将来的Linux）。 Delphi示例是 here 。

文字转语音

5 个答案: