MCI _winmm.dll

使用MCI API，源文件中需要包含头文件 Mmsystem.h，在Project->Settings->Link->Object/libray module中加入库 Winmm.lib。 VS2008在源文件加上#include "mmsystem.h" #pragma comment(lib,"winmm.lib")

１、MCI简介

MCI(Media Control Interface，媒体控制接口)向Windows程序提供了在高层次上控制媒体设备接口的能力。程序不必关心具体设备，就可以对激光唱机（CD）、视盘机、波形音频设备、视频播放设备和MIDI设备等媒体设备进行控制。

对于程序员来说，可以把MCI理解为设备面板上的一排按键，通过选择不同的按键（发送不同的MCI命令）可以让设备完成各种功能，而不必关心设备内部实现。

比如，对于play，视盘机和CD机有不同的反应（一个是播放视频，一个播放音频），而对用户来说却只需要按同一按钮。

应用程序通过向MCI发送命令来控制媒体设备。MCI命令接口分命令字符串和命令消息两种，两者具有相同的功能。命令字符串具有使用简单的特点，但是它的执行效率不如命令消息。

所有的MCI命令字符串都是通过多媒体API函数mciSendString传递给MCI的，该函数的声明为：

MCIERROR mciSendString(

LPCTSTR lpszCommand, 　　　//MCI命令字符串

LPTSTR　lpszReturnString,　//存放反馈信息的缓冲区

UINT　　cchReturn, 　　　　//缓冲区的长度

HANDLE　hwndCallback 　　　//回调窗口的句柄，一般为NULL

); //若成功则返回0，否则返回错误码。

该函数返回的错误码可以用mciGetErrorString函数进行分析，该函数的声明为：

BOOL mciGetErrorString(

DWORD　fdwError,　　　//函数mciSendString返回的错误码

LPTSTR lpszErrorText, //接收描述错误的字符串的缓冲区

UINT　 cchErrorText　 //缓冲区的长度

);

下面是使用mciSendString函数的一个简单例子：

char buf[50];

MCIERROR mciError;

mciError=mciSendString("open cdaudio",buf,strlen(buf),NULL);

if(mciError)

{

mciGetErrorString(mciError,buf,strlen(buf));

AfxMessageBox(buf);

return;

}

open cdaudio命令打开CD播放器，如果出错（如驱动器内没有CD）则返回错误码，此时可以用mciGetErrorString函数取得错误信息字符串。

２、MCI设备

open是MCI打开设备的命令，cdaudio是MCI设备名。MCI的设备类型如下：

animation　　动画设备

cdaudio　　　CD播放器

dat　　　　　数字音频磁带机

digitalvideo 某一窗口中的数字视频（不基于GDI）

other　　　　未定义的MCI设备

overlay　　　重叠设备（窗口中的模拟视频）

scanner　　　图象扫描仪

sequencer　　MIDI序列器

videodisc　　视盘机

waveaudio　　播放数字波形文件的音频设备

设备名是在注册表或SYSTEM.INI的[mci]部分定义的，典型的[mci]段如下：

[mci]

cdaudio=mcicda.drv

sequencer=mciseq.drv

waveaudio=mciwave.drv

avivideo=mciavi.drv

videodisc=mcipionr.drv

等号的左边是设备名，右边是对应的MCI驱动程序。当安装了新的MCI驱动程序时，系统要用不同的设备名来区分。

３、MCI命令

使用MCI设备一般包括打开、使用和关闭三个过程，常用的MCI命令有：

open　　　　打开设备

close　　　 关闭设备

play　　　　开始设备播放

stop　　　　停止设备的播放或记录

record　　　开始记录

save　　　　保存设备内容

pause　　　 暂停设备的播放或记录

resume　　　恢复暂停播放或记录的设备

seek　　　　改变媒体的当前位置

capacility　查询设备能力

info　　　　查询设备的信息

status　　　查询设备状态信息

MCI的大部分命令可以控制不同的媒体设备，但其中record和save命令并不是所有MCI设备都可以使用。

MCI命令的使用是很随意的，只要先打开，最后关闭，中间可以随意调用各种命令。

(1) open　打开设备

MCI设备使用前必须先打开，当然，使用后也必须要关闭，以免影响他人的使用。

open device_name type device_type alias device_alias

device_name　 　　　要使用的设备名，通常是文件名。

type device_type　　设备类型，例如waveaudio或sequencer，可省略。

alias device_alias　设备别名，指定后可在其他命令中代替设备名。

(2) play　开始设备播放

MCI设备打开后即可以播放，可使用设备名或别名。

play device_alias from pos1 to pos2 wait repeat

若省略from则从当前磁道开始播放，若省略to则播放到结束。

若指明wait则等到播放完毕命令才返回。

若指明repeat则会不停的重复播放。

若同时指明wait和repeat则命令不会返回，本线程产生堵塞，通常会引起程序失去响应。

(3) 播放CD

void CTttView::OnOpenCD()

{

mciSendString("open cdaudio",NULL,0,NULL);

mciSendString("play cdaudio",NULL,0,NULL);

);

void CTttView::OnStopCD()

{

mciSendString("stop cdaudio",NULL,0,NULL);

mciSendString("close cdaudio",NULL,0,NULL);

);

还可以：

pause cdaudio 　暂停播放。

resume cdaudio　继续被暂停的播放。

seek cdaudio to <位置>　移动到指定磁道。

set cdaudio door open/closed　弹出或缩进CD盘。

(4) 播放多媒体文件

void CTttView::OnMyMenu()

{

mciSendString("open myfolder\tada.wav alias aa",NULL,0,NULL);

或　mciSendString("open myfolder\flourish.mid alias aa",NULL,0,NULL);

或　mciSendString("open myfolder\clock.avi alias aa",NULL,0,NULL);

mciSendString("play aa wait",NULL,0,NULL);

mciSendString("close aa",NULL,0,m_hWnd);

);

(5) 录制声音

void CTttView::OnStartRecord()

{

mciSendString("open new type waveaudio alias aa",NULL,0,NULL);

mciSendString("record aa",NULL,0,NULL);

);

void CTttView::OnStopRecord()

{

mciSendString("save aa c:\aaa.wav wait",NULL,0,NULL);

mciSendString("close aa",NULL,0,NULL);

);

４、MCI命令消息

到目前为止，我们使用的都是MCI命令字符串。可以发现，命令字符串具有简单易学的优点，但这种接口与C/C++的风格相去甚远，如果程序要查询和设置大量数据，那么用字符串的形式将很不方便。

MCI的命令消息接口提供了C语言接口，它速度更快，并且更能符合C/C++程序员的需要。

所有MCI命令消息都是通过mciSendCommand函数发送的，函数声明为：

MCIERROR mciSendCommand(

MCIDEVICEID wIDDevice, 　//设备的ID，在打开设备时不用该参数

UINT　　　　uMsg, 　　　//命令消息

DWORD 　　　fdwCommand, //命令消息的标志

DWORD 　　　dwParam 　　//指向包含命令消息参数的结构

); //若成功则返回0，否则返回错误码

命令消息uMsg与命令字符串是对应的，例如，open与MCI_OPEN完成的是一样的功能。

变量wDeviceID用来保存设备的ID，系统用ID来标识不同的设备，以保证命令发给正确的对象。

void CTttView::OnMyMenu()

{

MCI_OPEN_PARMS mciOpen;

UINT wDeviceID;

mciOpen.lpstrDeviceType = "avivideo";

mciOpen.lpstrElementName = "myfolder\clock.avi";

mciSendCommand(0, MCI_OPEN, MCI_OPEN_ELEMENT, (DWORD)&mciOpen);

wDeviceID=mciOpen.wDeviceID;

MCI_PLAY_PARMS mciPlay;

mciSendCommand(wDeviceID, MCI_PLAY, MCI_WAIT, (DWORD)&mciPlay);

);

可以看出，用命令消息比用命令字符串要复杂的多，但它的执行效率高。

参考网站 http://baike.baidu.com/view/1622810.htm?fr=ala0_1 和http://msdn.microsoft.com/en-us/library/dd743572(VS.85).aspx

做个mp3播放器，用realplay和WMP做出来的程序内存占用太大。
如果你仅仅是播放MP3，建议使用API函数mciSendString，我把该函数的详细资料罗列如下供你参考。
Option Explicit
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
mciSendString是用来播放多媒体文件的API指令，可以播放MPEG,AVI,WAV,MP3,等等，下面介绍
它的使用方法：
　　该函数有四个参数：
第一个参数：要发送的命令字符串。字符串结构是:[命令][设备别名][命令参数].
第二个参数：返回信息的缓冲区,为一指定了大小的字符串变量.
第三个参数：缓冲区的大小,就是字符变量的长度.
第四个参数：回调方式，一般设为零
返回值：函数执行成功返回零，否则返回错误代码

一、常用命令
　　1.打开（Open），格式：Open 设备名 [type 设备型式][alias 别名]
Dim mName as string
mName = "f:\mpeg\mpeg1.avi"
mciSendString "open mName type MPEGVideo Alias movie parent %u Style %u notify",0&, 0, 0
　其中：
open 操作命令
mName 全路径文件名
type MPEGVideo 是指打开MPEG,AVI等类型，如果不加这一句，就是打开WAV,MP3等
Alias movie 定义了该操作的别名为movie，后续操作只要指明别名即可
parent %u 源
Style %u 样式
notify 通知
　　2.播放（Play），格式：Play 设备名 [from 起点][to 终点]
mciSendString "play movie", 0&, 0, 0
mciSendString "play movie fullscreen", 0&, 0, 0 '全屏播放
　　3.暂停（Pause）：
mciSendString "pause movie", 0&, 0, 0
　　4.继续（Resume）：
mciSendString "resume movie", 0&, 0, 0
　　5.停止（Stop）：
mciSendString "stop movie", 0&, 0, 0
　　6.关闭（Colse）：
mciSendString "close movie", 0&, 0, 0
　　7.前进到下一个位置：
mciSendString "step movie", 0&, 0, 0
　　8.后退到上一个位置：
mciSendString "step movie reverse", 0&, 0, 0
　　9.前进或后退 N 個位置(其中 N<0 即表示后退)
mciSendString "step movie by " & str(N), 0&, 0, 0
　　10.获取当前播放位置：
Dim ST As String64
mciSendString "status movie position", st, len(st), 0
　　11. 获取媒体的总长度：
mciSendString "status movie length", st, len(st), 0
l=val(st) 'l就是所播放文件的长度
　　12.获取播放当前状态：
Dim ST As String64
mciSendString "status movie mode", ST, Len(ST), 0
If Left(ST, 7) = "stopped" Then (处理代码) '播放完毕
　　13.循环播放：
mciSendString "play movie repeat", 0&, 0, 0

二、控制声音大小(1-1000)：
Dim V As Long
mciSendString "status movie volume",&V, len(v), 0 'V是获取的音量大小值。
V = 50
mciSendString "setaudio movie volume to 数值", 0, 0, 0 'V是设置的音量值

三、设置播放位置.(需事先设定时间格式)，格式：Seek 设备名 [to 位置 | to start | to end]
Dim P1 as Long, P2 as Long
P1 = 100: P2 = 3000
mciSendString "seek movie to ", P1, 0, 0 'P1是当前起始位置，单位：毫秒
mciSendString "seek movie to start", 0&, 0, 0 '定位到开头位置
mciSendString "play movie", 0&, 0, 0 '定位后再播放
或者：
mciSendString "play movie FROM P1 to P2",0&, 0, 0 'P1是起始位置，P2是停止位置。单位：毫秒
mciSendString "seek movie to end", 0&, 0, 0 '定位到最后位置

四、在指定控件上播放视频：
mciSendString "open AVI 文件名 parent hWnd style child", 0&, 0, 0
其中，hWnd 是控件的句柄
执行上述命令之后，影片会被放置在控件的左上角，且影片的大小不受控件大小的影响，如果想要改变
影片播放的位置及大小，可以在執行 play 指令前先执行 put 指令，格式如下：
　　mcisendString "put AVI 文件名 window at X Y [Width Height]", 0&, 0, 0
其中：X、Y为影片左上角坐标，Width、Height为影片的宽高度

五、如果播放视频还可控制亮度(1-2000)
Dim B As Long
mciSendString "status movie brightness", B, 0, 0 'B是获取的亮度值。
B = 50
mciSendString "setvideo movie brightness to " & B, &0, 0, 0 'B是设置的亮度值

六、录音设置：
　　录音前，用以下语句初始化
　　1.设为8位：
mciSendString "set wave bitpersample 8", "", 0, 0
　　2.设为11025Hz
mciSendString "set wave samplespersec 11025", "", 0, 0
　　3.设为立体声：
mciSendString "set wave channels 2", "", 0, 0
　　4.实现PCM格式（不一定正确）：
MCISENDSTRING "set wave format tag pcm","", 0, 0
　　5.开始录音：
mciSendString "close movie",0&,0,0
mciSendString "open new type WAVEAudio alias movie",0&,0,0
mciSendString "record movie",0&,0,0
　　6.保存录音到c:\123.wav
mciSendString "stop movie",0&,0,0
mciSendString "save movie C:\123.wav",0&,0,0
mciSendString "close movie",0&,0,0

七、开关光驱：
mciSendString "set cdaudio door open", "", 0, 0 '打开
mciSendString "set cdaudio door close", "", 0, 0 '关闭

八、其它
　　1.设置设备的各种状态（Set）
Set alias_name[audio all off][audio all on][time format ms]:
　　Set命令用来设置设备的各种状态.如:静音,有声音,时间格式为毫秒等.
　　2.取得设备的状态（Status）
Status alias_name[length][mode][position]:
　　Status命令用来取得设备的状态.如:该媒体文件的长度,该媒体文件所处状态,该媒体文件的当前位置等. 的长度,该媒体文件所处状态,该
媒体文件的当前位置等.
参考代码：
TCHAR fileName[]="D:\俺的文档\my music\爷爷泡的茶.mp3";
TCHAR shortName[MAX_PATH];
GetShortPathName(fileName,shortName,sizeof(shortName)/sizeof(TCHAR));
TCHAR cmd[MAX_PATH+10];
wsprintf(cmd,"play %s",shortName);
mciSendString(cmd,"",NULL,NULL);
（调用mciSendString第一个参数传“play 文件全路径”就可以，“文件全路径”最好传绝对路径，不建议wanghepeng10那样值传递文件名。
另外如果文件全路径中含有空格的话要使用GetShortPathName转换成短路径。

来自CSDN博客，http://blog.csdn.net/clearver/archive/2010/01/18/5209244.aspx