Текст в речь - PullRequest
       11

Текст в речь

6 голосов
/ 20 января 2009

Я совершенствую маленькое приложение для напоминания и напоминания, которое я создаю много лет назад, и я хотел бы делать ежечасный звуковой сигнал, но вместо того, чтобы подавать звуковой сигнал, было бы намного приятнее, это показывало бы время. Есть ли простой способ сделать это в DELPHI D2007 или более поздней версии? Спасибо

Ответы [ 5 ]

6 голосов
/ 20 января 2009

Проверьте учебник Брайана Лонга Синтез речи и распознавание речи с использованием SAPI 5.1

Я написал программу преобразования текста в речь, используя это руководство.

Он читает содержимое буфера обмена, когда я нажимаю CTRL + F10

4 голосов
/ 20 января 2009
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;
2 голосов
/ 21 января 2009

Я недавно снял видео на , заставляя ваши приложения говорить в Delphi. Лично я ни разу не нашел применения для преобразования текста в речь в одном из своих приложений, но интересно узнать, как это сделать; -)

0 голосов
/ 27 ноября 2012

Вы можете использовать eSpeak с Delphi для поддержки большего количества языков и Mac (и, надеюсь, Linux в будущем). Пример Delphi: здесь .

0 голосов
/ 20 января 2009

В моем коде я использую MS Agent и компонент TAgntSrvr: http://delphi.icm.edu.pl/ftp/d30free/agntsrvr.htm

Также вы можете проверить эту ссылку или просто Google вокруг: "text speech delphi"

...