|
盒子资源分类 |
![]() |
|
|
|
基于MS SPEECH 5.1的语音识别演示 |
![]() |
关键字:Speech SRC 语音识别 机器人 语音控制 |
来 自:原创 |
平 台:Win2k/XP/NT,Win2003 |
下载所需:0 火柴 |
深浅度:初级 |
完成时间:2007/6/1 |
发布者:xingzj0117 |
发布时间:2007/6/24 |
编辑器:DELPHI7 |
语 种:简体中文 |
分 类:组件 |
下载浏览:4473/13592 |
|
|
|
|
基于MS SPEECH 5.1的语音识别,By DELPHI幽冥魔焰 SUNAGE。 |
本站原创作品,未经作者许可,严禁任何方式转载;转载作品,如果侵犯了您的权益,请联系我们! |
相关文章 |
|
![]() |
|
相关评论 |
![]() |
共有评论8条
当前显示最后6条评论
|
kinneng |
2007/7/28 8:31:08 |
好东西,但是这代码Vb的早已经有,试过不实用,5.1已经很多年了,Ms没更新,识别率 不是怎样,做玩具都不及格,调用Ibm的我也研究过,效果差不多,不过很多年,上世纪 了 |
3304xfq |
2007/8/1 12:55:37 |
var i:ISpeechRecoGrammar;
procedure TForm1.FormCreate(Sender: TObject); var f:TFileStream; buff:array of byte; begin
i:=SpInProcRecoContext1.CreateGrammar(0);
//SpFileStream1.Open('c:\a.wav',0,false);
SpInProcRecoContext1.Recognizer.AllowAudioInputFormatChangesOnNextSet:=False;
SpMemoryStream1.Format.type_:=18;
//SpInProcRecoContext1.Recognizer.AudioInputStream:=SpFileStream1.DefaultInterface; SpInProcRecoContext1.Recognizer.AudioInputStream:=SpMemoryStream1.DefaultInterface; i.DictationUnload;
SpInProcRecoContext1.EventInterests:=SREAllEvents; i.DictationSetState(0);
end;
procedure TForm1.SpInProcRecoContext1Recognition(ASender: TObject; StreamNumber: Integer; StreamPosition: OleVariant; RecognitionType: TOleEnum; const Result: ISpeechRecoResult); begin Memo1.Lines.Add(result.PhraseInfo.GetText(0,-1,false)); end;
procedure TForm1.SampleGrabber1Buffer(sender: TObject; SampleTime: Double; pBuffer: Pointer; BufferLen: Integer); var buff:olevariant; p:Pointer; b:array of byte;
begin
//pBuffer就是声音数据,也就是wavefile的数据,从sizeof(wavehead)(以后的数据sizeof(wavehead)好像是=58)
buff:=VarArrayCreate([0,BufferLen-1],varByte); p := VarArrayLock(buff); windows.CopyMemory(p,pbuffer,bufferlen);
VarArrayUnlock(buff);
SpMemoryStream1.Write(buff); //???这步以后 AudioInputStream=nil,而且CPU永远是0,就是说没有进行识别
//我要对buff:array of byte的内存流识别,是不是应该用SpMemoryStream1?, //我用其它的,比如spaudioplug,write时就"拒绝存取"spaudioplug在simpleaudio.dll中
end;
怎么处理啊,各位大侠帮忙 |
ugksoft |
2007/8/9 12:58:36 |
已经解决 |
isxuzhu |
2007/9/28 13:22:05 |
SRC.EXE一启动就报错"OLE ERROR". 我已经安装了MS SPEECH5.1.为何会这样呢. |
feineng |
2007/11/19 9:23:22 |
SRC.EXE一启动就报错"OLE ERROR". 我已经安装了MS SPEECH5.1.为何会这样呢. 我的也是 楼主呢? |
2cc070112 |
2011/1/18 9:54:29 |
先下载,谢谢分享 |
我要发表评论 |
查看全部评论 |
![]() |
|
|
|