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多媒体空间(二)所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)