---- ⑩speak方法:agent通过调用语音合成引擎,支持英语的语音合成输出功能,只需输入英文字符串,agent就能通过声卡、音箱“说话”。agent的当前版本尚不具备支持中文语音合成功能,所以只能以.wav文件的形式播放中文。使用时可以将想要说的中文句子预先录好,以.wav形式存储,在程序中调用即可。参数text表示文字气球中显示的文字,参数url表示.wav文件的路径。
---- peedy.speak('嗨,朋友们,你们好,现在由我为您提供帮助!','c:\新建文件夹\help.wav');
---- peedy.speak( 'do you like my help? if so, please send me an email! thank you!', '' );
---- ⑾commands.add方法:在button1click事件中为agent添加自定义语音识别命令,参数const name表示语音命令的标识,参数caption表示该命令在输入命令窗口中的显示标题,参数voice表示该命令对应的语句。当用户通过麦克风向动画人物发出语音命令时,触发agent的command事件,因此我们可以另外编写一个过程完成语音识别功能。
procedure tform1.button1click(sender: tobject); begin peedy.commands.add('delphi','run
delphi','delphi',true,true); peedy.commands.add('visual basic',' run vb','vb',true,true);
peedy.show(0); peedy.speak('what can i do for you, sir?',''); end;
---- ⑷、按f9运行程序。以上程序在delphi3.0/4.0、windows95/98/nt简体中文版环境下调试通过。