首页 > 编程 > Visual Basic > 正文

MCI Command String总览

2023-06-12 12:11:35
字体:
来源:转载
供稿:网友

(注:本文以2000年七月的MSDN解释为准)

MCI Command String是多媒体设备的程序接口。通过它,我们可以打开一个多媒体文件,例如mp3,VCD文件,Mpeg4格式的文件等等,并对它进行播放,暂停,关闭等操作。现在小弟有幸给大家介绍一下MCI Command String的使用方法。
MCI Command String是通过mciExecute或mciSendString两个函数执行的。这两个函数的声明如下:
Private Declare Function mciExecute Lib "winmm.dll" Alias "mciExecute" (ByVal lpstrCommand As String) As Long
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
这两个函数都有一个叫lpstrCommand的参数, 这个参数就是我们今天要介绍的MCI Command String。其中函数mciSendString还有三个参数,lpstrReturnString是一个字符串,它用来接收mciSendString函数返回的信息(例如,我们在lpstrCommand中的ming令是让函数返回打开的文件的设备类型,那么函数就把设备类型的信息保存在这个参数中。);uReturnLength参数用来指定参数lpstrReturnString的长度;hwndCallback是接收“wait”、“notify”消息的窗口句柄,在Visual Basic中调用时该参数设为0即可。
如果ming令执行出错,函数mciExecute会直接弹出一个对话框,提示出错的原因。而mciSendString函数会返回一个ErrorCode (错误代码),该代码的具体含义您可以参考MSDN中的目录“Platform SDKGraphics and Multimedia ServicesWindows MultimediaMultimedia ReferenceMultimedia ConstantsMCIERR Return Values”。您可以根据具体情况选择到底使用哪一个函数来执行MCIming令。例如,在调试的时候使用mciExecute,以便快速地获得错误原因,而在将要发布的程序中使用mciSendString函数,让程序中已设置的错误陷阱去处理错误,以避免频繁的错误提示而使用户觉得厌烦。
 
在熟悉了这两个函数后,我们就可以进入正题?D?DMCI Command String了。
MCI Command String的ming令格式是这样的:lpszCommand lpszDevice lpszCommandFlag lpazFlag
lpszCommand是mciming令,例如open,play,stop,close等等。
lpszDevice是设备名(或文件名)。例如,我们用以下的程序打开了我的文档中的Music01.dat文件,并用“alias”参数将其别名设为OpenFile:
dim lReturn as long                                                               (1)
lReturn=mciExecute(“open C:Mydocu~1Music01.dat alias OpenFile type MPEGVideo”)      (2)
那么,在以后的MCI Command String中lpszDevice参数必须指定为OpenFile。例如,关闭该文件的代码如下:
lReturn=mciExecute(“close OpenFile”)                                               (3)
如果我们没有为打开的文件设定别名,则以后调用的MCI Command String中lpszDevice参数为DOS路径名加文件名。例子如下:
dim lReturn as long                                                               (4)
lReturn=mciExecute(“open C:Mydocu~1Music01.dat type MPEGVideo”)                  (5)
lReturn=mciExecute(“close C:Mydocu~1Music01.dat type MPEGVideo”)                  (6)
从这里可以看出,设定别名的好处是减少了代码的输入。
LpszCommandFlag是mciming令的参数。如上代码(2),“alias OpenFile”以及“type MPEGVideo”就是ming令“open”的参数。通常一个mciming令的参数少则几个多则几十个。
LpazFlag可以为指定为“wait”或“notity”。如果为“wait”,那么mciming令执行完毕后会向父窗体发送MCI_WAIT消息,“notity”则发送MCI_NOTIFY消息。此参数在Visual Basic中无甚用处。
 
在此先声明一下,微软支持的多媒体设备的类型共有cdaudio,dat,digitalvideo,other,overlay,scanner,sequencer,vcr,videodisc,waveaudio十种(注意:微软不支持RealPlay格式的文件。您可以用以下代码获得已打开的文件的类型:lReturn=mciSendString(“capability lpszDevice device type”,sReturn,32,0) )。至于哪一类设备支持哪些参数,您可以在MSDN中查找关键字“MCI Command Strings”,选中所列出的ming令,在其中的HTML帮助文档中通常会有一个表格告诉你哪些设备支持哪些参数或者在第一段中有信息告诉您哪些设备支持该ming令。
好了,现在让我们对又繁索,又该死,又强大的mciming令参数作一个系统的介绍。(本文仅介绍openming令的常用参数,其它ming令的参数有机会小弟再介绍给大家。)
open:
该ming令用来打开一个多媒体文件。所有的设备都支持这个ming令。在任何mciming令执行前,都必须先打开多媒体文件,以初始化设备。
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表