注册 登录
编程论坛 VB6论坛

[原创] mp3播放器(Lrc歌词同步)源程序代码分析

VB爱上我 发布于 2005-12-16 04:05, 9756 次点击
这个是我自己制作的MP3播放器,可能还有一些不够好的地方。还请大家多指点。
程序原代码下载:
只有本站会员才能查看附件,请 登录

[此贴子已经被作者于2005-12-20 15:49:02编辑过]

39 回复
#2
VB爱上我2005-12-16 04:19
大家评评看能不能再完善一下。请大家记得回贴呀!

[此贴子已经被作者于2005-12-20 15:49:29编辑过]


#3
griefforyou2005-12-16 09:55
添加多个音乐文件和单个文件都可以用通用对话框控件,你的自定义窗口显示的信息太少了,无法使用各种查看方法来列表文件。
#4
griefforyou2005-12-16 10:00
我发现显示歌词的是一堆Label控件数组,如果真的有必要使用控件数组,你只需在设计模式下创建index=0的一个控件即可,其它的可以在程序中动态加载。
#5
griefforyou2005-12-16 10:04
还有一点,使用MCI API函数播放音乐的效果非常差,可以考虑使用Meida Player/Real Player插件或者其它第三方的MP3播放控件。
#6
sanjin2005-12-16 11:13
不错,偶要多多学习.
#7
VB爱上我2005-12-16 14:21

版主说的好,打开单个文件没有过滤条件。
如果我用通用对话框实现打开多个文件好像行不通因为只能选一个文件,还有在通用对话框上没有“重新添加音乐文件”和“添加音乐文件”,我就用文件控件自己做一个了。
文件控件里面没有过滤选择,我本来想用下拉列表框做一个的。可是这个在运行时是不能用的。只能在设计时使用。

#8
VB爱上我2005-12-16 14:25
关于控件数组的问题,
如果是在运行时动态添加当然好,可是有的歌词文件太长了。我是用图片框装标签的。可是图片框的高度居然有限制,这样就只能装20多个标签了。所以还要用另一个图片框装。
如果是动态添加的话就很难控制标签显示的位置了。
#9
VB爱上我2005-12-16 14:29
MCI API函数播放音乐还可以呀,只是有几个音乐文件不能播放。如果Meida Player/Real Player插件或者其它第三方的MP3播放控件我觉得就会有限制。那还必需安装这些控件才行。我做这个播放器的同时做了一个有Meida Player控件的播放器。只是添加了一点功能 ,其它功能它上面就有。
#10
griefforyou2005-12-16 22:45
以下是引用VB爱上我在2005-12-16 14:21:00的发言:

版主说的好,打开单个文件没有过滤条件。
如果我用通用对话框实现打开多个文件好像行不通因为只能选一个文件,还有在通用对话框上没有“重新添加音乐文件”和“添加音乐文件”,我就用文件控件自己做一个了。
文件控件里面没有过滤选择,我本来想用下拉列表框做一个的。可是这个在运行时是不能用的。只能在设计时使用。

通用对话框是可以多选的,我多年前写的一个MP3播放器中的文件列表

只有本站会员才能查看附件,请 登录

#11
griefforyou2005-12-16 22:47
以下是引用VB爱上我在2005-12-16 14:25:00的发言:
关于控件数组的问题,
如果是在运行时动态添加当然好,可是有的歌词文件太长了。我是用图片框装标签的。可是图片框的高度居然有限制,这样就只能装20多个标签了。所以还要用另一个图片框装。
如果是动态添加的话就很难控制标签显示的位置了。

相信你一定用过“迷你歌词”或者“速配歌词”之类的软件,他们做的非常好。

另外,图片框的高度是没有什么限制的。

[此贴子已经被作者于2005-12-16 22:49:09编辑过]

#12
VB爱上我2005-12-17 12:19
版主你的那个软件我看了,很好。
你怎么弄的啊。他大体上和系统的通用对话框一样。只是在选择文件不同了。特别是文件名不同了。选几个文件就有几个文件名出现。
通过设置什么改掉通用对话框的属性的。
#13
VB爱上我2005-12-17 12:24
在设计时可以用拖动和剪切粘贴的方法把标签放到容器里面。而在运行时怎么弄啊。
是啊。专业的软件做的真是好。不管是界面还功能。特别是“千千静听”真好。我这个真是不能比呀。
版主,你现在是搞VB研究吗。
#14
VB爱上我2005-12-20 15:51
没有和我同兴趣的吗?
看贴的高手。把你的播放器发过来看看。
#15
VB爱上我2005-12-27 16:17
看到论谈上有个朋友她想用数据库来实现管理播放列表,这个办法真不错。我这个播放器在这方面不够。
#16
VB爱上我2005-12-31 20:06

自顶一下!祝大家新快乐!

#17
awin992005-12-31 23:23
能否做到和千千静听一样,可以精确到每个字呀,谢谢你,期待你的更进,到时一定要发邮件告知我呀

QQ46461611,wily@toncreate.com
#18
VB爱上我2006-01-01 09:05
呵呵,原来你也在观注我的播放器.好我会的.不过现在要找工作一时没时间.
#19
moonf2006-01-03 20:48

歌词要一个一个自己选麻烦
你可以设置把歌词用同名表示或者读标签来做文件名

#20
Linyj2006-01-03 23:21
蛮不错的,值得学习
#21
VB爱上我2006-01-05 16:29

如果在一个文件夹中有一个和音乐文件同名的歌词文件就不用自己选歌词了。

#22
luvys2006-01-05 19:48
楼主啊~
真是谢谢你了!
#23
leon22006-01-07 15:51

精确每一个字,这个不难实现。但是有些歌词唱的字所用的时间并不是十分均匀的,所以会有些误差。

#24
VB爱上我2006-01-08 14:58
就算时间是均匀的,也不是很好实现,因为我是用标签显示歌词的。那么字色是不好控制的。
#25
leon22006-01-10 12:51

我有一个设想,就是用新的字体颜色(表示已唱过)去替换旧的字体颜色(表示未唱过),比如创建一个新的 Label 控件用来表示已经唱过的歌词(但是起初要把这个控件的 Caption 清掉,不论装载歌词与否),并将这个控件与显示歌词的控件重合。然后在播放的时候,不断检测在唱歌词中的哪一个字,如果检测到在唱某个字,就在表示已经唱过歌词的控件的 Caption 属性中加上这个字。这样,屏幕上看来就会觉得有替换效果了。

我最近也在做播放器,准备要大干一场。咱们多多交流啊!

#26
VB爱上我2006-01-14 10:11
千千静听上的歌词也不是同时显示的,而是显示当时那一句歌词(显示的意思是色变了),只是显示它的标签在随进度的变化而变化。
谢谢看得起,我上一次网好难呀。自己没有电脑,还要到网吧才行。
#27
图腾0012006-01-15 12:14

我也想学啊!

#28
purana2006-01-15 12:57
不错..做得不错....但我感觉界面不是太好..
#29
VB爱上我2006-01-20 15:02
界面没有搞好,我当时只是用photoshop简单的做的一个图片。搞上去的。
#30
lk12062006-01-20 16:19
很不错了的.我啥时候能有这种水平哎44444..
#31
VB爱上我2006-05-13 13:35
这个贴子里有源码!
#32
lili_05232006-12-14 09:31

先谢谢了
看看研究研究

#33
ioriliao2006-12-14 10:34
以下是引用griefforyou在2005-12-16 10:04:00的发言:
还有一点,使用MCI API函数播放音乐的效果非常差,可以考虑使用Meida Player/Real Player插件或者其它第三方的MP3播放控件。

VB自带的MCI 效果不错呀..我个人觉得比千千的还好!

#34
wszzg2007-01-13 21:02

很不错,真是好的,努力,好东西,大家分享

#35
fengdl20072007-07-25 16:51
我也用MIC做了一个播放器,可是歌词同步一直都做不好,你的这个版本要能自动查找歌词文件,自动保存歌曲列表就更完善了。

[此贴子已经被作者于2007-8-20 17:09:27编辑过]


#36
serverliu2007-09-13 09:21
佩服你的代码 也赶想啊 那么多的LABEL 晕死啊

看看我的把
QQ:25070202

[IMG]http://www.mndsoft.com/softimg/NetMp3Player.JPG[/IMG]

歌词显示控件 支持拖动歌词 仿TT
只有本站会员才能查看附件,请 登录

#37
moqiaoduo2012-06-16 11:54
有没有支持日文和韩文的啊!
#38
qq3725058552012-06-20 11:57
楼主不错了,现在我的只能显示一行,在研究一下,向楼主学习
#39
李冉asd1232012-09-11 21:11
多谢分享
#40
luorl2013-04-12 12:42
回复 10楼 griefforyou
可以的话,能发你的这个源码出来学习吗?谢谢!
1