很多朋友向我索取MCI的資料，但是我這里的資料早就不知道哪里去了，這里把MSDN里面的東西拿出來給大家看一下，方便英語不好的朋友。 用MCI進行編程主要有兩個東西需要掌握，下面的篇幅用來說明這兩個方面。 一、mciSendCommand函數 這個函數用來打開MCI設備并且通過給設備發送MCI命令來對設備進行控制，這個函數的原型是這樣的： MCIERROR mciSendCommand( MCIDEVICEID?IDDevice?,?? //要控制的設備的ID，無符號整數? UINT?uMsg?,?????????????????????? //MCI命令,像MCI_OPEN,MCI_PLAY? DWORD?fdwCommand?,???? //命令的參數，不同的命令有不同的參數可以選擇??? DWORD?dwParam??????????? //Param也就是像MCI_OPEN_PARMS之類的，每個命令有不同的Param? ); MCI命令是在mmsystem.h中define的整數，常用的命令有MCI_OPEN(打開設備）、MCI_PLAY(播放）、MCI_CLOSE(關閉設備）等，詳細的命令信息請看MSDN，如果沒有MSDN光盤可以到http://www.msdn.com?查看。下面演示程序演示如何打開一個設備播放MP3文件。 MCI_OPEN_PARMS op; op.dwCallback=NULL; op.lpstrAlias=NULL; op.lpstrDeviceType=_T("MPEGAudio"); //設備類型，大多數文件可以這樣設置 op.lpstrElementName=_T("D://1.mp3") ;//文件路徑 op.wDeviceID=NULL;???????????????????????????? //打開設備成功以后保存這個設備號備用 UINT rs;???????????????????????????????????????????????? //接受函數返回結果 rs=mciSendCommand(NULL,MCI_OPEN,MCI_OPEN_ELEMENT ,(DWORD)&op);//發送命令打開設備，成功返回0，否則返回錯誤號，第三個參數這里必須是MCI_OPEN_ELEMENT? if(rs==0)???????????? //設備打開成功就播放文件 { ?? MCI_PLAY_PARMS pp; ?? pp.dwCallback=NULL; ?? pp.dwFrom=0;?????????????????????? //開始播放的位置 ?? mciSendCommand(op.wDeviceID,MCI_PLAY,MCI_WAIT,(DWORD)&pp);//播放文件，如果第 三個參數設為MCI_WAIT則程序窗口會被阻塞，為了避免這種情況可以設為MCI_NOTIFY ,這兩個標志的詳細區別請見MSDN，區別不小哦。 最后別望了在WM_CLOSE消息處理過程中發送MCI_CLOSE命令關閉設備，寫成這樣： MCI_GENERIC_PARMS gp; gp.dwCallback=NULL; mciSendCommand(op.wDeviceID,MCI_CLOSE,MCI_WAIT,(DWORD)&gp); 最后別忘了在工程屬性的link屬性頁里加入winmm.lib鏈接，也不要忘了#include <mmsystem.h>

?

?

轉自http://hi.baidu.com/chenyun1985/blog/item/2f5d27730872991c8601b033.html

?

?

用這個函數播放媒體文件最好先打開再播放,當然是可以一步播放的.?
mciSendString(L"open abc.mp3 type MPEGVideo alias mci",0,0,0);?
abc.mp3就是要打開的文件,mci是打開后的名稱,相當其它API函數的句柄,但這個函數是用一個別名來表示.這個名字可以自己隨便取,只要不引起 沖突就可以了.關于MPEGVideo,有人說播放相應的視頻文件才用,其實不是,播放任何文件都可以用,包括聲音文件,你沒有必要再用其它的設備名.?
然后播放用:?
mciSendString(L"play mci",0,0,0);?
就可以播放了,想暫停用:?
mciSendString(L"pause mci",0,0,0);?
停止:?
mciSendString(L"stop mci",0,0,0);?
重新(繼續)播放,再次調用:?
mciSendString(L"play mci",0,0,0);?
關于這個函數的后3個參數是用于返回值的,也非常簡單.第二個參數是字串空間,提前分配好內存用于存貯返回信息,第二個參數是這個空間的大小.第三個參數是一個接收消息的窗口句柄,這個函數可以向窗口發送消息.?
我比較測試沒有問題的就是這些,其它的什么seek,在特定的窗口播放呀,都沒有搞定.知道的希望說一下,只要貼個語句就可以了.

?

?	用完之后,大家要記的用? mciSendString(L"close mci",0,0,0);? 關閉,不然可能會有問題.? mciSendString(L"play mci fullscreen",0,0,0);? 全屏播放,可以在播放的時候調用.? 這個函數可以播放你的Windows Media Player支持的所有文件類型,在我的機器上也可以播放rmvb,3gp,mov等類型,但還是有問題.rmvb打開速度非常之慢,但Windows Media Player就不會.播放某些類型還會打開一個×××的窗口,Windows Media Player也不會.

?

?

?

?

mciSendString的常用命令

????? 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.打開：
????? 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.播放：
????? mciSendString "play movie", 0&, 0, 0?
????? mciSendString "play movie fullscreen", 0&, 0, 0 '全屏播放
????? 　　3.暫停：
????? mciSendString "pause movie", 0&, 0, 0?
????? 　　4.繼續：
????? mciSendString "resume movie", 0&, 0, 0?
????? 　　5.停止：
????? mciSendString "stop movie", 0&, 0, 0?
????? 　　6.關閉：
????? 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 String*64
????? 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 String*64
????? mciSendString "status movie mode", ST, Len(ST), 0
????? If Left(ST, 7) = "stopped" Then (處理代碼) '播放完畢
????? 　　13.循環播放：
????? mciSendString "play movie repeat", 0&, 0, 0

????? 二、控制聲音大小：
????? Dim V As Long
????? mciSendString "status movie volume", V, 0, 0 'V是獲取的音量大小值。
????? V = 50
????? mciSendString "setaudio movie volume to " & V, &0, 0, 0 'V是設置的音量值

????? 三、控制亮度（如果是播放視頻）
????? Dim B As Long
????? mciSendString "status movie brightness", B, 0, 0 'B是獲取的亮度值。
????? B = 50
????? mciSendString "setvideo movie brightness to " & B, &0, 0, 0 'B是設置的亮度值

????? 四、到指定的位置播放。
????? 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 指令，格式如下：

????? mciendString "put AVI 文件名 window at X Y [Width Height]", 0&, 0, 0
?????? 其中 X 及 Y 參數須填入位置，而 Width 及 Height 參數則填入影片顯示出來的寬度及高度

????? 六、錄音設置：
????? 　　錄音前，用以下語句初始化
????? 　　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 '關閉

轉載于:https://blog.51cto.com/freetoskey/844141

總結

以上是生活随笔為你收集整理的声音的播放——MCI的使用的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。