打造自己的媒体播放器补遗
?牐犗绕舳疺B 6.0,添加一个新窗体到工程中,将mediaplayer控件添加到工具箱中。此时,在工具箱中将可以看到新增加了一个彩色收音机图标,这就是mediaplayer控件(为Windws Media Player所用)。单击该控件将它添加到窗体中,名称不变,属性autosize设为true,autostart设为false。
?牐犎缓螅诖疤逯刑砑印安シ拧泵畎磁ィ涿莆猙tn_command1,属性Caption为“播放”,在其Click事件中填写以下代码:
?牐燩rivate Sub btn_command1_Click()
?牐燤ediaPlayer1.FileName = "f:\vcd\同学聚会.mpg" '指定所要播放MP3文件所在的位置,可自行指定
?牐燤ediaPlayer1.Play
?牐燛nd Sub
?牐犜诖疤逯刑砑印巴V埂泵畎磁ィ涿莆猙tn_command2,属性Caption为“停止”,在其Click事件中填写以下代码:
?牐燩rivate Sub btn_command2_Click()
?牐燤ediaPlayer1.Stop
?牐燤ediaPlayer1.Stop
?牐燛nd Sub
?牐犞葱懈贸绦颍セ鳌安シ拧卑磁ィシ拍阒付ǖ亩嗝教逦募H粢V梗セ鳌巴V埂卑磁ゼ纯伞?
?牐犗旅姘裮ediaplayer控件的常用的属性和方法介绍一下:
?牐燼llowchangesize 是否允许改变播放画面大小,如果为false,则不能用MediaPlayer1
?牐燚isplaySize=mpFullScreen 全屏幕播放
?牐? =Autosize自动调节大小
?牐? =Autostart是否自动开始播放
?牐燗llowscan 是否允许浏览
?牐燚isplaysize 播放屏幕的尺寸,有7种值
?牐燜ilename 要播放的文件名
?牐燤ute 控制声音的打开或者关闭
?牐燩laycount 播放次数
?牐燫ate 播放的快慢
?牐燩lay 播放
?牐燩ause 暂停
?牐燬top 停止
?牐燨pen 打开文件,文件名为参数
?牐犛纱丝杉琺ediaplayer控件是很直观,很方便的一个控件,当然,这里只是能播放,如果要提高播放的质量,还是需要下一番功夫的。