不是5。1吧用5。1的离子,我写过http://www.jaxp.net
解决方案 »
- 急急!!!Delphi 調用 label matrix
- 急,轉pdf文件的問題
- 关于XP中Delphi5的问题
- 具有相同父亲的两个Frame如何交替创建?具体见内
- 在线等待!!! 关于用ADO连接Sybase ASE 12.5的速度问题!
- BorlandSoft的产品非常全面,我愿意免费提供BorlandSoft.com的邮箱和二级域名、网站空间,大家意下如何?限30000个。
- 版主和各位高手!窗体之间如何传递变量?我的思路和代码如下!不知何处错?
- 在DELPHI中,用那个控件能把.RTF文件按原有的格式显示在屏幕上!
- 怎样获得一个image的句柄?
- 大家介绍几个好的dephi网站,国内和国外的.
- 问一个语音卡软件的问题
- 有谁写过类似递归的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.
---------------------------------------看清楚.