使用过TTS的请进。 不是5。1吧用5。1的离子,我写过http://www.jaxp.net 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用是用了,当时想做个阅读英语课文的傻瓜软件,可你的问题,真没想过,还是up。至于汉语发音,好像解霸可以,它是如何实现的?可不可以借用一下呵呵。以前我也取巧的方法用tts发汉语,比如我爱你三个字: wo ai ni .呵呵,仅仅模拟而已 应用 Microsoft TTS 语音引擎的 Delphi 语言实例: 建立一个单窗体工程,添加一个 Edit 和 2 个 Button 控件,分别命名为 Edit1、btnSpeak、btnStop。然后安装引用 TTS 的 vtxtauto.tlb 类库文件,方法是点击菜单“工程-Import Type Library”,点“add”按钮,然后选中 Windows\speech 下的 Vtxtauto.tlb 文件,放入安装包后,再将其添加成 Delphi 的一个 Unit,自动产生的名字为“VTxtAuto_TLB”。然后,在主 Unit 的 Uses 里引用 VTxtAuto_TLB,即在 Uses 后添加字串“VTxtAuto_TLB”。最后参考以下代码: …… procedure TfrmSpeech.FormCreate(Sender: TObject); begin vtxt:=CoVTxtAuto_.Create; vtxt.Register('','Speech'); Edit1.Text:='I am a chinese, I love my homeland very much, and you?' end; procedure TfrmSpeech.btnSpeakClick(Sender: TObject); begin vtxt.Speed:=100; vtxt.Speak(trim(Edit1.Text),10); end; procedure TfrmSpeech.btnStopClick(Sender: TObject); begin vtxt.StopSpeaking; end; end. 你那种引入的TTS函数不全面的!!!可惜我没办法,否则就传一段源码给你!!! 我问的是它们有什么区别,而不是怎样使用TTS?---------------------------------------看清楚. 如何用PostMessage控制菜单? PC串口连手机模块发送短信 简单问题,我却不会!! 各位高手兄弟帮忙! string 转 pansichar? 在Delphi中如何动态向Popupmenu中添加菜单?给了代码谢谢! 有没解决的办法,谢谢up 大虾请进,为小辈看看这个代码,我提问,必定给分 请问如何用Delphi开发分布式系统?(SOS) 各位大虾,求助!!! 问一个语音卡软件的问题 有谁写过类似递归的sql??
up。
至于汉语发音,好像解霸可以,它是如何实现的?可不可以借用一下呵呵。以前我也取巧的方法用tts发汉语,比如我爱你三个字: wo ai ni .呵呵,仅仅模拟而已
应用 Microsoft TTS 语音引擎的 Delphi 语言实例: 建立一个单窗体工程,添加一个 Edit 和 2 个 Button 控件,分别命名为 Edit1、btnSpeak、btnStop。然后安装引用 TTS 的 vtxtauto.tlb 类库文件,方法是点击菜单“工程-Import Type Library”,点“add”按钮,然后选中 Windows\speech 下的 Vtxtauto.tlb 文件,放入安装包后,再将其添加成 Delphi 的一个 Unit,自动产生的名字为“VTxtAuto_TLB”。然后,在主 Unit 的 Uses 里引用 VTxtAuto_TLB,即在 Uses 后添加字串“VTxtAuto_TLB”。最后参考以下代码: ……
procedure TfrmSpeech.FormCreate(Sender: TObject);
begin
vtxt:=CoVTxtAuto_.Create;
vtxt.Register('','Speech');
Edit1.Text:='I am a chinese, I love my homeland very much, and you?'
end;
procedure TfrmSpeech.btnSpeakClick(Sender: TObject);
begin
vtxt.Speed:=100;
vtxt.Speak(trim(Edit1.Text),10);
end;
procedure TfrmSpeech.btnStopClick(Sender: TObject);
begin
vtxt.StopSpeaking;
end;
end.
---------------------------------------看清楚.