T
topsuper
Unregistered / Unconfirmed
GUEST, unregistred user!
为什么我的agent程序中不能说english?
procedure TForm1.Button1Click(Sender: TObject);
begin
Request1 := Agent1.Characters.Load('kv','C:/winnt/msagent/chars/merlin.acs');
Peedy := Agent1.Characters.Character('kv');
peedy.show(0);
Request1 := peedy.Play('LookUp');
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
peedy.speak('this is a test','');
end;
文字显示了，但却没有声音，不只为什么？
请GS指点
procedure TForm1.Button1Click(Sender: TObject);
begin
Request1 := Agent1.Characters.Load('kv','C:/winnt/msagent/chars/merlin.acs');
Peedy := Agent1.Characters.Character('kv');
peedy.show(0);
Request1 := peedy.Play('LookUp');
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
peedy.speak('this is a test','');
end;
文字显示了，但却没有声音，不只为什么？
请GS指点