Async Professional的问题.(77分)

  • 主题发起人 主题发起人 xebaobei
  • 开始时间 开始时间
X

xebaobei

Unregistered / Unconfirmed
GUEST, unregistred user!
http://www.delphibbs.com/keylife/iblog_show.asp?xid=610
谁帮整理出来一份代码啊.
我调试不成功

这句话我不明白
这个事件我不知道哪里出来的


然后添加两个菜单项,并同两个Action连接,编写Action的OnExecute事件处理函数:

//监控电话
procedure TFrmMain.ActionAnswerExecute(Sender: TObject);
begin
try
ApdTapiDevice.EnableVoice := True;
except
Application.MessageBox('当前设备不支持语音扩展', '错误', MB_OK);
end;

if ApdTapiDevice.EnableVoice then
begin
ApdTapiDevice.AutoAnswer;
LBSysInfo.Items.Add('answer:接听对方电话');
CurrentState := csWaiting;
end
end;

而且我用到
ApdTapiDevice.PlayWaveFile('Greeting.wav');//播放功能提示语音
这个命令的时候一定过不了
错误信息
不支持指定的格式或无法解释指定的格式.请使用能力功能来确定所支持格式.

谁帮解决这两个问题
或把能通过的代码MAIL TO shuizhiqiang@etang.com
或实现类似功能的代码邮件给我,小弟在这里谢谢了
这些是我全部份分,可惜还是那么的少
 
阿山之家,你的问题会有圆满答复
http://wenjinshan.wx-e.com/index2.htm
 
要$的啊
那本书在书店也没有
 
tttttt
帮忙回答了呀大哥们
 
自己解决了~
是声音文件位问题
 
后退
顶部