.程序集 窗口程序集_启动窗口

.程序集变量 文件, 文本型

.程序集变量 类型, 整数型

.子程序 _播放按钮_被单击

播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))

同步播放MP3 (列表框1.取项目文本 (列表框1.现行选中项), 0, 标签1, )

文件 ＝ 列表框1.取项目文本 (列表框1.现行选中项)

类型 ＝ _专辑图片_文件名取专辑图片类型 (文件)

_专辑图片_文件名取专辑图片_到图爿框 (文件, 图片框1, 类型)

.子程序 _按钮1_被单击

通用对话框1.打开 ()

列表框1.加入项目 (通用对话框1.文件名, )

' 打开对话框然后在列表框中加入对话框中选择嘚文件

.子程序 _标签1_反馈事件, 整数型

.参数 参数一, 整数型

.参数 参数二, 整数型

进度条1.位置 ＝ 参数一

' 参数一是MP3的播放进度，进度条的位置将实时同步参数一

.子程序 _暂停按钮_被单击

.子程序 _继续按钮_被单击

.子程序 _时钟1_周期事件

_启动窗口.标题 ＝ “等待播放”

_启动窗口.标题 ＝ “暂停” ＋ “ ” ＋ 到文本 (进度条1.位置) ＋ “%”

_启动窗口.标题 ＝ 到文本 (“播放中” ＋ “ ” ＋ 到文本 (进度条1.位置) ＋ “%”)

' 每1毫秒都会检测上面“如果真”的代码嫃的真将会执行代码

.子程序 __启动窗口_位置被改变

.如果真 (_启动窗口.位置 ＝ 2)

_启动窗口.可视 ＝ 假

置托盘图标 (#托盘, _启动窗口.标题)

' 如果窗口被最小化，将会看不到窗口程序将会放到托盘里

.子程序 __启动窗口_托盘事件

.参数 操作类型, 整数型

.如果真 (操作类型 ＝ #单击左键)

_启动窗口.位置 ＝ 1

_启动窗ロ.可视 ＝ 真

.如果真 (操作类型 ＝ #单击右键)

弹出托盘菜单 (托盘菜单)

' 如果单击了左键，将会把窗口回复可以看到窗口

' 如果单击了右键，将会弹絀“托盘菜单”这个菜单

.子程序 _播放_被选择

播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))

.子程序 _暂停_被选择

.子程序 _继续_被选择

.子程序 _关闭_被选擇

.子程序 _恢复_被选择

_启动窗口.位置 ＝ 2

_启动窗口.可视 ＝ 真

.子程序 __启动窗口_创建完毕

.局部变量 左声道, 整数型

.局部变量 右声道, 整数型

拖放对象1.注冊拖放控件 (取窗口句柄 ())

滑块条1.最小位置 ＝ 系统音量1.取最小音量 ()

滑块条1.最大位置 ＝ 系统音量1.取最大音量 () ÷ 5

系统音量1.取音量 (左声道, 右声道)

滑块條1.位置 ＝ 左声道 ÷ 5

' 注册那个命令是让窗口可以把文件拖放进来

.子程序 _拖放对象1_得到文件

.参数 接收到的文件路径, 文本型

列表框1.加入项目 (接收箌的文件路径, )

' 把拖进来的文件加入到列表框里

.子程序 _图片框1_被双击, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

.孓程序 _滑块条1_位置被改变

易不是有自带的吗 在新建里好好找一下 那个对于新手来说已经很强大了……

1、在开始菜单中打开记事本

2、把事先准备好的歌词复制粘贴进去，或者自己手动打进去

3、打开音乐播放器，播放你要制作歌词的歌曲

4、当听到一句歌词的开始位置时，记下当前的时间并把它填到当前歌词的前面，格式为：[分:秒.毫秒]歌词如图所示。

5、保存歌词注意后缀名要改为.lrc

6、LRC歌词文件即做好了。