MCI多媒体空间(二)

MCI多媒体空间(二),第1张

概述12.3.1  MCI多媒体控件(2) (3)MCI命令 MCI使用一套高级的、与设备无关的命令,称为媒体控制接口命令,可以控制多种媒体设备,表12-3给出MCI控件中使用的MCI命令。 表12-3  MCI命令 命    令 说    明 Open 打开MCI设备 Close 关闭MCI设备 Play 播放文件 Pause 暂停 Stop 停止MCI设备 Back 向后步进 Step 向前步进

12.3.1 MCI多媒体控件(2)

(3)MCI命令

MCI使用一套高级的、与设备无关的命令,称为媒体控制接口命令,可以控制多种媒体设备,表12-3给出MCI控件中使用的MCI命令。

表12-3 MCI命令

Open

打开MCI设备

Close

关闭MCI设备

Play

播放文件

Pause

暂停

Stop

停止MCI设备

Back

向后步进

Step

向前步进

Prev

跳到当前曲目的起始位置

Next

跳到下一首曲目的起始位置

Seek

更改媒体位置

Record

向前或向后查找曲目

Eject

d出CD

Save

保存打开的文件

MCI控件命令的使用方法是通过控件的Command属性来执行,例如:

      AxMMContyrol1.Command="Open"  

上述语句表示打开指定的多媒体设备。对于命令及属性的具体使用方法,将通过具体的实例来说明。

2.用MCI控件实现多媒体播放器

(1)创建一个项目类型为VB.NET,模板为windows应用程序的项目Ch12_1。

(2)界面设计。

从工具箱中拖曳出一个MCI控件、一个PictureBox控件、两个button控件以及一个OpenfileDialog控件。设置窗体和控件的属性,如表12-4所示,设计好的窗体如图12-3所示。

表12-4 窗体属性设置

Form

name

FrmMPlayer

Text

我的播放器

AxMMControl

name

mciPlayer

PictureBox

name

picdisplay

button

name

btnopenfile

Text

打开文件

button

name

btnExit

Text

退出

图12-3 设计的播放器界面

(3)代码设计,为播放器添加播放AVI文件的功能。

在"打开文件"按钮的Click事件中添加下面的代码:

      PrivateSubbtnopenfile_Click(ByValsenderAsSystem.Object,_     ByValeAsSystem.EventArgs)Handlesbtnopenfile.Click     DimdlgOpenAsNewOpenfileDialog     dlgOpen.Filter="avi格式|*.avi"    dlgOpen.Title="打开媒体文件"    IfdlgOpen.ShowDialog=windows.Forms.DialogResult.OKThen    mciPlayer.Command="close"    SelectCasedlgOpen.FilterIndex     Case1     Me.mciPlayer.DeviceType="avivIDeo"    CaseElse    MsgBox("无效的文件格式")     EndSelect    Me.mciPlayer.filename=dlgOpen.filename     Me.mciPlayer.Command="open"    Me.mciPlayer.Command="play"    EndIf    EndSub  
总结

以上是内存溢出为你收集整理的MCI多媒体空间(二)全部内容,希望文章能够帮你解决MCI多媒体空间(二)所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/langs/1294625.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-06-10
下一篇 2022-06-10

发表评论

登录后才能评论

评论列表(0条)

保存