C#中用API实现MP3等音频文件的播放类
扫描二维码
随时随地手机看文章
具体源码如下：
一、使用API函数mciSendString构成的媒体播放类。
using System;
using System.Runtime.InteropServices;
using System.Text;
using System.IO ;
namespace clsMCIPlay
{
///
/// clsMci 的摘要说明。
///
public class clsMCI
{
public clsMCI()
{
//
// TODO: 在此处添加构造函数逻辑
//
}
//定义API函数使用的字符串变量
[MarshalAs(Unmana
private string Name = "" ;
[MarshalAs(UnmanagedType.ByValTStr,SizeConst=128)]
private string durLength = "" ;
[MarshalAs(UnmanagedType.LPTStr,SizeConst=128)]
private string TemStr ="";
int ilong;
//定义播放状态枚举变量
public enum State
{
mPlaying = 1,
mPuase = 2,
mStop = 3
};
//结构变量
public struct structMCI
{
public bool bMut;
public int iDur;
public int iPos;
public int iVol;
public int iBal;
public string iName;
public State state;
};
public structMCI mc =new structMCI() ;
//取得播放文件属性
public string FileName
{
get
{
return mc.iName;
}
set
{
//ASCIIEncoding asc = new ASCIIEncoding();
try
{
TemStr ="";
TemStr = TemStr.PadLeft(127,Convert.ToChar(" "));
Name = Name.PadLeft(260,Convert.ToChar(" ")) ;
mc.iName = value;
ilong = APIClass.GetShortPathName(mc.iName,Name, Name.Length);
Name = GetCurrPath(Name);
//Name = "open " + Convert.ToChar(34) + Name + Convert.ToChar(34) + " alias media";
Name = "open " + Convert.ToChar(34) + Name + Convert.ToChar(34) + " alias media";
ilong = APIClass.mciSendString("close all", TemStr, TemStr.Length , 0);
ilong = APIClass.mciSendString( Name, TemStr, TemStr.Length, 0);
ilong = APIClass.mciSendString("set media time format milliseconds", TemStr, TemStr.Length , 0);
mc.state = State.mStop;
}
catch
{
MessageBox.Show("出错错误!");
}
}
}
//播放
public void play()
{
TemStr = "";
TemStr = TemStr.PadLeft(127,Convert.ToChar(" "));
APIClass.mciSendString("play media", TemStr, TemStr.Length , 0);
mc.state = State.mPlaying ;
}
//停止
public void StopT()
{
TemStr = "";
TemStr = TemStr.PadLeft(128,Convert.ToChar(" "));
ilong = APIClass.mciSendString("close media", TemStr, 128, 0);
ilong = APIClass.mciSendString("close all", TemStr, 128, 0);
mc.state = State.mStop ;
}
public void Puase()
{
TemStr = "";
TemS
ilong = APIClass.mciSendString("pause media", TemStr, TemStr.Length, 0);
mc.state = State.mPuase ;
}
private string GetCurrPath(string name)
{
if(name.Length <1) return "";
name = name.Trim();
name = name.Substring(0,name.Length-1);
return name;
}
//总时间
public int Duration
{
get
{
durLength = "";
durLength = durLength.PadLeft(128,Convert.ToChar(" ")) ;
APIClass.mciSendString("status media length", durLength, durLength.Length, 0);
durLength = durLength.Trim();
if(durLength == "") return 0;
return (int)(Convert.ToDouble(durLength) / 1000f);
}
}
//当前时间
public int CurrentPosition
{
get
{
durLength = "";
durLength = durLength.PadLeft(128,Convert.ToChar(" ")) ;
APIClass.mciSendString("status media position", durLength, durLength.Length, 0);
mc.iPos = (int)(Convert.ToDouble(durLength) / 1000f);
return mc.iPos;
}
}
}
public class APIClass
{
[DllImport("kernel32.dll", CharSet = CharSet.Auto)]
public static extern int GetShortPathName (
string lpszLongPath,
string shortFile,
int cchBuffer
);
[DllImport("winmm.dll", EntryPoint="mciSendString", CharSet = CharSet.Auto)]
public static extern int mciSendString (
string lpstrCommand,
string lpstrReturnString,
int uReturnLength,
int hwndCallback
);
}
}
下载文档多战略资产管理公司平方资本 L2 Capital Management宣布，已与Google达成合作，加快其投资组合公司的可持续增长。此次合作还将推动平方资本在投资和推动各种Web3及区块链生态系统的战略。Web3通常被...
关键字： API MANAGEMENT 互联网 区块链（全球TMT2022年10月8日讯）机器人流程自动化（RPA ）企业Automation Anywhere, Inc.宣布，公司已从Silicon Valley Bank、SVB Capital和Hercules Ca...
关键字： AUTOMATION AN API 机器人加利福尼亚州圣何塞2022年10月7日 /美通社/ -- 机器人流程自动化（RPA ）领域的全球领先企业Automation Anywhere, Inc.今天宣布，公司已从S...
关键字： AUTOMATION AN 自动化 APITims中国与特殊目的收购公司Silver Crest Acquisition于9月28日完成合并，于9月29日在纳斯达克交易。Tims中国由咖啡连锁品牌Tim Hortons母公司RBI和笛卡尔资本集团(Cartesi...
关键字： 纳斯达克 TI ACQUISITION API
热门文章
编辑精选
论坛活动
技术子站
资料下载
技术学院
- TrendForce集邦咨询: 2025年第三季度企业级 SSD价量齐升，产业营收季增28%
- TrendForce集邦咨询: 传统旺季与新品带动，2025年第三季度全球智能手机产量季增9%
- TrendForce集邦咨询: AI基础建设助力NAND Flash产业，2025年第三季度铠侠营收季增33.1%
- TrendForce集邦咨询：存储器价格飙升冲击游戏主机毛利，2026年出货量预估将下调
- TrendForce集邦咨询: NAND Flash wafer供给紧缩加剧，11月部分产品涨幅逾60%
- TrendForce集邦咨询发布2026年十大科技市场趋势预测: 锚定AI驱动下的产业新路径
- TrendForce集邦咨询: 2025年第三季度DRAM产业营收季增30.9%，达414亿美元
- TrendForce集邦咨询: AR显示技术竞争随品牌布局加剧，预估2030年LEDoS技术渗透率达65%
