谁知道哪里有WindowMediaPlayer组件编程的例程? 最好是DELPHI的,或者VB也成。谢谢。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 呵呵,TMediaPlayer编程的例子么?网上不知道有没,你搜索一下吧。我手头上倒是有。可以播放.avi,.wav,.mid等。 buttonclick1()beginmediaplayer1.filename:='c:\12.wav';mediaplayer1.open;mediaplayer1.play;button1.caption:=timetostr(time());end;procedure TForm1.MediaPlayer1Notify(Sender: TObject);beginbutton1.caption:=timetostr(time());end;两个时间相减或者用mediaplayer打开wav文件时间长度:mediaplayer1.length 单位/毫秒 我这里有个比较简单的应用例子,把你的E-Mail给我 老兄!我们算是同志了!http://expert.csdn.net/Expert/topic/1370/1370287.xml?temp=.6951715你也想这方面的编程吗? 在delphi中就有,还行,很好用 关于Delphi的一道图形题 为什么Max()不能取得最大值? 二维数组的小问题 pilicat(delphi迷) :请进来回复一下,刚才操作错误,没有给你分. 不知哪位高手的If语句学的好。帮帮忙来看看这个复杂的判断语句~! 关于lookup字段的建立,请帮帮忙 傻问题!帮帮我! delphi 中的strpcopy 如何取得前一个网页中的信息,谢谢 关于局域网的问题,请大家都来看看吧! 这一句错那了,帮忙指出吧。 怎样才能让regsoft替我发送注册码
begin
mediaplayer1.filename:='c:\12.wav';
mediaplayer1.open;
mediaplayer1.play;
button1.caption:=timetostr(time());
end;
procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
button1.caption:=timetostr(time());
end;
两个时间相减
或者
用mediaplayer打开wav文件
时间长度:mediaplayer1.length 单位/毫秒
http://expert.csdn.net/Expert/topic/1370/1370287.xml?temp=.6951715
你也想这方面的编程吗?