下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、优选文档音乐播放器开发文档动能介绍开始菜单包含:a.增加音乐文件b.增加音乐文件夹c.增加背景图片d.退出播放模式:a.单曲循环b.序次循环c.列表播放d.随机播放透明度:透明百分之几或不透明界面设置:迷你模式关于:版本信息2、代码讲解全局变量:privateSoundPlayerPlayer=newSoundPlayer();privateSoundPlayerSencondPlayer=newSoundPlayer();Imageimage=newImage500;/存放图片数组.优选文档privateintImagecount=0;/计算背景图片数privateintorder=0;/储
2、藏图片总数privateintfileCount=0;/数组受骗算音乐文件数privateintfileCount1=0;/文件系数stringmusicfile=newstring500;/存放音乐文件intselectOne=0;/双击事件选择的音乐的序号staticintstop=2;/判断是暂停还是播放staticdoubleCurrentPosition=0;/获得文件播放的地址staticintState=0;/当前状态等于时进行单曲循环,等于零的时候进行序次播放,/当前状态等于时为随机播放/当前状态等于时为列表播放OpenFileDialogopenfile=newOpenFil
3、eDialog();/打开当地磁盘对话框增加音乐文件privatevoid增加文件ToolStripMenuItem1_Click(objectsender,EventArgse)fileCount1+;openfile.Filter=|*.mp3;openfile.Multiselect=true;/支持多行文件tryif(DialogResult.OK=openfile.ShowDialog()musicfilefileCount=openfile.FileName;FileInfofileinfo=newFileInfo(musicfilefileCount);/FileInfo类是将文
4、件去相对路径stringfilename=fileCount1.ToString()+_+fileinfo.Name;/使音乐名前加序号并只取文件.优选文档名this.listBox1.Items.Add(filename);/将文件多行显示在列表中this.musicname.Text=fileinfo.Name;PlayAndStop(fileCount);/启动MP3播放器fileCount+;catch(Exception)MessageBox.Show(musicfilefileCount.ToString();增加音乐文件夹privatevoid增加文件夹ToolStripMenu
5、Item1_Click(objectsender,EventArgse)FolderBrowserDialogfolder=newFolderBrowserDialog();/文件夹初始化.优选文档folder.ShowDialog();stringfile=Directory(),*.MP3);/使用数组存获得的文件intfileName=0;tryforeach(stringMusicinfile)fileCount1+;FileInfof=newFileInfo(filefileName);/读取文件musicfilefileCount=filefileName;fileName+;fi
6、leCount+;/数组存文件数stringtotal=fileCount1.ToString()+_+f.Name;/f.Name只取f中的文件名this.listBox1.Items.Add(total);catch(Exception)MessageBox.Show(输入的音乐总数超出!);增加背景图片.优选文档privatevoid增加背景图片ToolStripMenuItem1_Click(objectsender,EventArgse)FolderBrowserDialogfolder=newFolderBrowserDialog();folder.ShowDialog();str
7、ingBGfile=Directory(),*.jpg);foreach(stringpicinBGfile)imageorder=Image.FromFile(pic);order+;this.timer1.Enabled=true;/启动准时器准时器privatevoidtimer1_Tick(objectsender,EventArgse)this.BGpicture.Image=imageImagecount;if(Imagecount=order-1).优选文档Imagecount=0;elseImagecount+;退出播放器privatevoid退出ToolStripMenuIt
8、em1_Click(objectsender,EventArgse)this.Close();MP3音乐播放器播放功能/播放MP3文件privatevoidPlayAndStop(intfileCount)trystop=3;this.PlayOrStop.Text=暂停;FileInfof=newFileInfo(musicfilefileCount);this.musicname.Text=();/获得正在播放的音乐名listBox1.SelectedIndex=fileCount;/自动选中跳转的文件axWindowsMediaPlayer1.URL=musicfilefileCount
9、;();catch(Exception)return;单曲循环privatevoid单曲循环ToolStripMenuItem1_Click(objectsender,EventArgse).优选文档CurrentPosition=axWindowsMediaPlayer1.Ctlcontrols.currentPosition;/获得正在播放的位=CurrentPosition;/接着停止的地址连续播放State=1;axWindowsMediaPlayer1.settings.setMode(loop,true);b.序次循环privatevoid序次播放ToolStripMenuItem
10、1_Click(objectsender,EventArgse)State=0;c.列表播放privatevoid列表循环ToolStripMenuItem1_Click(objectsender,EventArgse)State=3;d.随机播放privatevoid随机播放ToolStripMenuItem1_Click(objectsender,EventArgse)State=2;调用播放模式的事件/改变播放状态,当音乐一首播放完后转入下一首,有线程调用privatevoidaxWindowsMediaPlayer1_PlayStateChange(objectsender,AxWMP
11、Lib._WMPOCXEvents_PlayStateChangeEvente)Threadthread=newThread(newThreadStart(PlayThread);/序次播放if(axWindowsMediaPlayer1.playState=WMPLib.WMPPlayState.wmppsMediaEnded&State=0)tryif(selectOnefileCount-2)selectOne=0;thread.Start();.优选文档elseselectOne+;thread.Start();catch(Exception)return;/随机播放tryif(axW
12、indowsMediaPlayer1.playState=WMPLib.WMPPlayState.wmppsMediaEnded&State=2)RandomNum=newRandom();intSum=Num.Next(0,fileCount);FileInfof=newFileInfo(musicfileSum);this.musicname.Text=f.Name;selectOne=Sum;thread.Start();catch(Exception)return;/列表播放tryif(axWindowsMediaPlayer1.playState=WMPLib.WMPPlayStat
13、e.wmppsMediaEnded&State=3)if(selectOnefileCount-2)selectOne=0;else.优选文档selectOne+;thread.Start();catch(Exception)return;调用线程privatevoidPlayThread()PlayAndStop(selectOne);调用音乐播放功能制作界面透明功能/透明度%privatevoidtoolStripMenuItem7_Click(objectsender,EventArgse)this.Opacity=0.1;/透明度%privatevoidtoolStripMenuIte
14、m8_Click(objectsender,EventArgse)this.Opacity=0.3;/透明度%privatevoidtoolStripMenuItem9_Click(objectsender,EventArgse)this.Opacity=0.5;/透明度%privatevoidtoolStripMenuItem10_Click(objectsender,EventArgse)this.Opacity=0.7;.优选文档/透明度%privatevoidtoolStripMenuItem11_Click(objectsender,EventArgse)this.Opacity=0
15、.9;/不透明privatevoid不透明ToolStripMenuItem1_Click(objectsender,EventArgse)this.Opacity=1.0;界面设置privatevoid迷ToolStripMenuItem_Click(objectsender,EventArgse)Colorcolor=Color.LightGoldenrodYellow;this.musicname.BackColor=color;this.label1.BackColor=color;this.listBox1.BackColor=color;this.Up.BackColor=colo
16、r;this.PlayOrStop.BackColor=color;this.Down.BackColor=color;this.Stop.BackColor=color;this.MusicText.BackColor=color;this.menu.BackColor=color;this.statusStrip1.BackColor=color;版本信息.优选文档privatevoid版本ToolStripMenuItem1_Click(objectsender,EventArgse)MessageBox.Show(软件版本:.0正式版n宣布时间:.01.19nn新音乐播放器具备音乐播放
17、、歌曲找寻、主题切换、窗口透明等功能,是一款性能优异、体积“瘦小”、界面灿烂、操作简单的全功能音乐软件;n新音乐播放器满足用户的音乐需要,为您的音乐享受带来更美好的体验。nntt欢迎大家提出难得建议!nntttt思远IT学院nnttt制作人:童新联系方式QQ:865110135关于软件);上一曲功能:privatevoidDown_Click(objectsender,EventArgse)tryif(selectOnefileCount-1)selectOne+;PlayAndStop(selectOne);else.优选文档selectOne=0;PlayAndStop(selectOne
18、);catch(Exception)return;下一曲privatevoidUp_Click(objectsender,EventArgse)tryif(selectOne=0)selectOne=fileCount1-1;PlayAndStop(selectOne);elseselectOne-;PlayAndStop(selectOne);catch(Exception)return;播放或暂停privatevoidPlayOrStop_Click(objectsender,EventArgse)try.优选文档if(stop%2=0)/判断播放或暂停this.PlayOrStop.Text=暂停;selectOne=this.listBox1.SelectedIndex;FileInfof=newFileInfo(musicfileselectOne);this.musicname.Text=f.Name;stringplayUrl=musicfileselectOne;axWindowsMediaPlayer1.URL=playUrl;=CurrentPo
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 上海市(长宁区)2025学年第一学期初三语文教学质量调研试卷【含答案】
- 组织可持续发展方案承诺书(3篇)
- 2026年北海康养职业学院单招职业技能考试题库参考答案详解
- 2026年信阳航空职业学院单招职业适应性考试题库及答案详解(典优)
- 付清余款合同模板(3篇)
- 服装师合同模板(3篇)
- 2025-2026学年项羽教学设计素材网站
- 2025-2026学年大班大中国教案
- 中国石油大学(北京)《全球变化导论》2024-2025学年第二学期期末试卷
- 吕梁学院《中华经典诵读艺术》2024-2025学年第二学期期末试卷
- 《非物质文化遗产概论(第三版)》全套教学课件
- 2025届高考语文一轮复习散文阅读考点二概括内容分析形象教学案
- 定额〔2025〕1号文-关于发布2018版电力建设工程概预算定额2024年度价格水平调整的通知
- 社区管理第四版 课件全套 汪大海 第1-19章 社区与社区管理 -突发事件与社区应急管理
- 幕墙工程专项施工方案(危大工程专家论证)
- GB/T 36547-2024电化学储能电站接入电网技术规定
- 电商培训机构学员培训合同(2篇)
- 库房租房合同简单版
- 宁乡猪-编制说明
- 食品理化检验技术单选测试题(附答案)
- 2024年江苏法院书记员招聘笔试参考题库附带答案详解
评论
0/150
提交评论