我现在想把4段wav声音文件连起来播放怎么办啊 我现在想把4段wav声音文件连起来播放怎么办啊,谁知道,在线等,最好是有这样函数 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 if mediaplayer.postion=mdiaplayer.length then begin meicpalyer1.filename:=next; mediaplayer1.open; next:=//next filename;end; 老大把4段Wave做成一个不就行了? 是这样的:先播放一段语音,然后是一段2位数的号码,是用0-9的语音数字组合起来的,最后还有一段语音,如果每条都做的话要做100个啊,虽然现在只用30个,但是以后还是一件麻烦的事情,用playsound不能连着播放 可以用timer 控件去检测声音是否停止播放,然后执行相应的操作就可以了 先把 要播放的文件放入 listbox 中 btn click if listbox.items.count > -1 then begin meicpalyer1.filename:=listbox.string[0]; mediaplayer1.open; end;MediaPlayer1Notify 事件中 if listbox.ItemIndex < listbox.Items.Count-1 then begin listbox.ItemIndex := listbox.ItemIndex +1; MediaPlayer.FileName := listbox.Items[listbox.ItemIndex]; Label3.caption := '正在播放'; Label3.update; try MediaPlayer.Open; MediaPlayer.Play; except MediaPlayerNotify(Nil); end; end else begin Label3.caption := '播放完成'; end; idhttp怎么不能下载文件部分? CxGrid 如何在SQL语句里往ACCEESS传日期型变量? 关于数据库里面DATE格式的field如何用combobox(或者DBComboBox)显示? 各位大虾请进,谈谈关于“车辆号牌识别”的开发! 大家举一个iinterface的声明和调用的例子 联接oracle数据库,如何做登录窗体, 怎么判断输入的密码对不对,回者有分(内空) 在线等候!简单的问题! 急救,感激不..... 十万火急,关于拖动控件时的闪烁问题 怎么样将值传递给弹出来的窗体? delphi如何建立站点
begin
meicpalyer1.filename:=next;
mediaplayer1.open;
next:=//next filename;end;
先播放一段语音,然后是一段2位数的号码,是用0-9的语音数字组合起来的,最后还有一段语音,如果每条都做的话要做100个啊,虽然现在只用30个,但是以后还是一件麻烦的事情,用playsound不能连着播放
btn click
if listbox.items.count > -1 then
begin
meicpalyer1.filename:=listbox.string[0];
mediaplayer1.open;
end;MediaPlayer1Notify 事件中
if listbox.ItemIndex < listbox.Items.Count-1 then
begin
listbox.ItemIndex := listbox.ItemIndex +1;
MediaPlayer.FileName := listbox.Items[listbox.ItemIndex];
Label3.caption := '正在播放';
Label3.update;
try
MediaPlayer.Open;
MediaPlayer.Play;
except
MediaPlayerNotify(Nil);
end;
end
else
begin
Label3.caption := '播放完成';
end;