使用Agent的问题(100分)

  • 主题发起人 主题发起人 oiwin
  • 开始时间 开始时间
O

oiwin

Unregistered / Unconfirmed
GUEST, unregistred user!
用SPEAK时,是有泡泡,但不发声,请高手指教!!
 
安装语音支持库,但不能发中文音
 
如果下不到给我一个邮箱地址。
 
其实你要想让它发汉语音可以speak('中文','中文.wav')
 
snappy 谢谢你!!
但我机子上的英语小精灵能读啊,是没语音支持库吗?
你发一个给我吧,我再试试.谢谢!!
qoiwin@hotmail.com
 
可能有点太大,发送几次没成功,给你一个地址吧:
http://www.microsoft.com/msagent/downloads.htm#tts
 
原来这个帖子是 http://www.delphibbs.com/delphibbs/dispq.asp?lid=1385182
内容如下:
导入 SAPI.dll (不用手工寻找,直接已经在 import type library 列表中),
这个 DLL 在列表中的名字是 :Microsoft Speech Object Library [Version 5.1]。
点 inatall... Delphi 让你选择包的名字和存放位置,我选择 /bpl/Sapi_V51.dpk
然后 Delphi 自动建立 SpeechLib_TLB.pas 和编译这个包,默认将这个库中的 19 个
控件装到 ActiveX 页。19 个元件的注册情况如下:
procedure Register;
begin
RegisterComponents('ActiveX',[TSpObjectTokenCategory, TSpObjectToken, TSpMMAudioIn, TSpMMAudioOut,
TSpVoice, TSpSharedRecoContext, TSpInprocRecognizer, TSpSharedRecognizer, TSpLexicon,
TSpUnCompressedLexicon, TSpPhoneConverter, TSpTextSelectionInformation, TSpPhraseInfoBuilder, TSpAudioFormat,
TSpWaveFormatEx, TSpInProcRecoContext, TSpCustomStream, TSpFileStream, TSpMemoryStream]);
end;
建一个新项目,上面放一个TSpVoice 、Memo 和一个按钮,在 Memo 中写“说话呀”,在 Button 的 onClick 里写
procedure TForm1.Button1Click(Sender: TObject);
begin
SpVoice1.Speak(memo1.Lines.Text,0);
end;
就读出来了呀。
相关的还有:http://www.delphibbs.com/delphibbs/dispq.asp?lid=1384349
 
多人接受答案了。
 
我有 普通话语音库.wav
 
to :Pc 狂迷
能不能给我一份
oiwin@fescomail.net
 
后退
顶部