版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
*/
///////////////////////////////////////////////////////////////////////
#ifndef__MIDI_H__
#define__MIDI_H__#includeclassCMidi
{public:
boolPlay();//播放初始化函數(shù)(打開設(shè)備并初始化)
CMidi();
~CMidi();
public:
voidOnTimer();//循環(huán)播放函數(shù)
boolInitPath();//初始化路徑,取得播放曲目列表文件的全路徑
boolOpenFiles();//打開文件對(duì)話框,獲取歌曲列表
boolOpenList();//讀取文件中的歌曲列表
boolSaveList();//保存列表
voidPer();//上一首
voidNext();//下一首
voidStop();//停止函數(shù),在播放以前先停止
DWORDgetinfo(DWORDitem);//獲取歌曲長(zhǎng)度信息
DWORDm_count;
DWORDcdlen,cdfrom,cdto;
intm_totalFiles;//保存歌曲的首數(shù)
intfr;//當(dāng)前已播放的歌曲數(shù)
CStringm_FileList[256];//歌曲路徑列表數(shù)組
CStringm_MusicFilePath;//保存歌曲列表文件的路徑
boolPlayingFalg;//正在播放標(biāo)志,以便定時(shí)器判斷
};#endif
//////////////////////////////////////////////////////////////////
//以下為MIDI.cpp文件
/////////////////////////////////////////////////////////////////
//Midi.cpp#include"stdafx.h"
#include"Midi.h"CMidi::CMidi()
{
m_totalFiles=0;
fr=0;
cdfrom=0;
m_MusicFilePath="";
PlayingFalg=false;}CMidi::~CMidi()
{}//------------播放---------------------
boolCMidi::Play()
{
if(m_FileList[fr]=="")
{//如果讀取路徑為空,則彈出打開對(duì)話框
OpenFiles();
}
else
{
PlayingFalg=true;//標(biāo)志為正在播放
MCI_OPEN_PARMSmciopenparms;//打開
MCI_PLAY_PARMSmciplayparms;//播放
//以下用fr做下標(biāo),能在停止再播放時(shí)恢復(fù)上次的位置
mciopenparms.lpstrElementName=m_FileList[fr];//播放路徑
mciopenparms.lpstrDeviceType=NULL;//文件類型為NULL,就可以支持全部類型
mciSendCommand(0,MCI_OPEN,MCI_DEVTYPE_WAVEFORM_AUDIO,
(DWORD)(LPVOID)&mciopenparms);//向MCI設(shè)備發(fā)送命令消息
m_count=mciopenparms.wDeviceID;
mciplayparms.dwCallback=NULL;//窗口擁有者句柄
cdlen=getinfo(MCI_STATUS_LENGTH);//得到曲目長(zhǎng)度
cdto=MCI_MAKE_HMS(MCI_HMS_HOUR(cdlen),MCI_HMS_MINUTE(cdlen),
MCI_HMS_SECOND(cdlen));//根據(jù)長(zhǎng)度計(jì)算出時(shí)、分、秒
mciplayparms.dwFrom=MCI_MAKE_HMS(0,0,0);//表示從哪兒開始播放吧
mciplayparms.dwTo=cdto;//表示放到哪兒為止
mciSendCommand(m_count,MCI_PLAY,MCI_TO|MCI_FROM,
(DWORD)(LPVOID)&mciplayparms);
//發(fā)送播放消息
}
returntrue;
}//---------------獲取歌曲信息(長(zhǎng)度,已播放長(zhǎng)度)------
DWORDCMidi::getinfo(DWORDitem)
{
MCI_STATUS_PARMSmcistatusparms;
mcistatusparms.dwCallback=NULL;
/*
//接受傳入的命令參數(shù),這是關(guān)鍵。命令參數(shù)如下:
獲取歌曲長(zhǎng)度:MCI_STATUS_LENGTH
獲取當(dāng)前已播放的長(zhǎng)度:MCI_STATUS_POSITION
*/
mcistatusparms.dwItem=item;//接受命令參數(shù)的地方
mcistatusparms.dwReturn=0;//返回值
mciSendCommand(m_count,MCI_STATUS,MCI_STATUS_ITEM,(DWORD)&mcistatusparms);
returnmcistatusparms.dwReturn;
}//-------------------停止-------------------
voidCMidi::Stop()
{
PlayingFalg=false;//關(guān)閉正在播放標(biāo)志
cdfrom=MCI_MAKE_HMS(0,0,0);//播放位置歸文件開頭
mciSendCommand(m_count,MCI_CLOSE,0,NULL);//發(fā)出關(guān)閉消息
m_count=0;
}//-------------------下一首----------------
voidCMidi::Next()
{
fr++;
if(fr>=m_totalFiles)
{
//讓fr指向下一個(gè)音樂文件,fr是從0下標(biāo)開始
//m_totalFiles為總文件數(shù)
fr=fr%m_totalFiles;
}
Stop();
Play();
}//----------上一首------------------
voidCMidi::Per()
{
fr--;
if(fr==-1)
{//指向最后一首歌,但fr是從0下標(biāo)開始的,而m_totalFiles是從1開始
fr=m_totalFiles-1;
}
Stop();
Play();//播放fr指向的位置}//----------保存曲目列表-----------------
boolCMidi::SaveList()
{
CFilefileList;//文件對(duì)象
if(!fileList.Open(m_MusicFilePath,CFile::modeCreate|CFile::modeWrite))
returnFALSE;//打開文件,不存在則創(chuàng)建,寫文件
charfileName[256];
for(inti=0;i<M_TOTALFILES;I++)
{//m_totalFiles為打開對(duì)話框中獲取的歌曲總數(shù)
strcpy(fileName,m_FileList[i]);//取出一條曲目路徑
fileList.Write(fileName,strlen(fileName));//寫入文件
fileList.Write("\r\n",2);//寫入一行結(jié)束和換行符
}
fileList.Write("----",4);//寫入文件最后標(biāo)志
fileList.Close();//關(guān)閉文件
returnTRUE;}//----------讀取曲目路徑列表-----------------
boolCMidi::OpenList()
{
CFilefileList;
if(!fileList.Open(m_MusicFilePath,CFile::modeNoTruncate|CFile::modeRead))
returnFALSE;//以只讀模式打開,不覆蓋原有文件,m_MusicFilePath為列表文件的路徑
charch;
while(1)
{
CStringfileName;
fileList.Read(&ch,1);//讀入一個(gè)字符
if(ch=='-')break;
//如文件是最后返回,-是文件最后的標(biāo)志
fileName+=ch;//否則存入
while(1)
{//讀入一行
fileList.Read(&ch,1);
if(ch=='\r')
{//這兒可以判斷是一行了
m_totalFiles++;//曲目首數(shù)計(jì)數(shù)
fileList.Read(&ch,1);
break;
}
fileName+=ch;
}
//下面這句把路徑加入列表中,用字符串?dāng)?shù)組代替
//m_totalFiles前面已經(jīng)加一了,所以這兒要少一個(gè)
m_FileList[m_totalFiles-1]=fileName;
}
fileList.Close();
returnTRUE;
}//----------打開對(duì)話框,獲取曲目列表-----------------
boolCMidi::OpenFiles()
{
CFileDialogf(true);//打開對(duì)話框?qū)ο?/p>
f.m_ofn.Flags|=512;//OFN_ALLOWMULTISELECT;目錄列表方式
f.m_ofn.lpstrFilter="所有媒體類型\0*.*\0\0";
if(f.DoModal()!=IDOK)
returnFALSE;//用戶單擊了“取消”
POSITIONpos=f.GetStartPosition();//獲取第一個(gè)文件位置
inti=0;
while(pos)
{
m_FileList[i]=f.GetNextPathName(pos);//讀取文件到曲目路徑列表
i++;
}
m_totalFiles=i;//保存曲目總數(shù)
Stop();
Play();//播放打開的文件
returnTRUE;
}//-------------------獲得播放列表文件的路徑------------
boolCMidi::InitPath()
{//初始化路徑,取得播放曲目列表文件的全路徑
TCHARpath[256];//保存文件路徑
GetModuleFileName(NULL,path,sizeof(path));//獲取當(dāng)前程序路徑
TCHAR*p=_tcsrchr(path,_T('\\'));//查找最后一個(gè)'\\'字符
if(p
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025-2030年中國新型煙草行業(yè)開拓第二增長(zhǎng)曲線戰(zhàn)略制定與實(shí)施研究報(bào)告
- 2025-2030年中國衛(wèi)星遙感行業(yè)全國市場(chǎng)開拓戰(zhàn)略制定與實(shí)施研究報(bào)告
- 2025-2030年中國空調(diào)維修與售后行業(yè)并購重組擴(kuò)張戰(zhàn)略制定與實(shí)施研究報(bào)告
- 新形勢(shì)下電子散熱材料及器件行業(yè)高速增長(zhǎng)戰(zhàn)略制定與實(shí)施研究報(bào)告
- 中國移動(dòng)互聯(lián)網(wǎng)APP行業(yè)發(fā)展趨勢(shì)預(yù)測(cè)及投資戰(zhàn)略研究報(bào)告
- 二年級(jí)數(shù)學(xué)(上)計(jì)算題專項(xiàng)練習(xí)匯編
- 春分文化與新媒介
- 管理層晉升述職報(bào)告
- 易制爆危險(xiǎn)化學(xué)品購銷交易流程
- 二零二五年度大型貨車司機(jī)勞動(dòng)合同范本與注意事項(xiàng)2篇
- 閱讀理解(專項(xiàng)訓(xùn)練)-2024-2025學(xué)年湘少版英語六年級(jí)上冊(cè)
- 民用無人駕駛航空器產(chǎn)品標(biāo)識(shí)要求
- 2024年醫(yī)院產(chǎn)科工作計(jì)劃例文(4篇)
- 2024-2025學(xué)年九年級(jí)英語上學(xué)期期末真題復(fù)習(xí) 專題09 單詞拼寫(安徽專用)
- 無創(chuàng)通氣基本模式
- 江西省贛州市尋烏縣2023-2024學(xué)年八年級(jí)上學(xué)期期末檢測(cè)數(shù)學(xué)試卷(含解析)
- 《臨床放射生物學(xué)》課件
- 腸造口還納術(shù)手術(shù)配合
- 2024年中考語文試題分類匯編:詩詞鑒賞(學(xué)生版)
- 中國音樂史與名作賞析智慧樹知到期末考試答案章節(jié)答案2024年山東師范大學(xué)
- 管廊維護(hù)與運(yùn)營績(jī)效考核評(píng)分表
評(píng)論
0/150
提交評(píng)論