易语言紫色蔷薇MP3播放器源码

易语言紫色蔷薇MP3播放器源码系统结构:启动,按钮提示组,注册列表文件,初始化歌曲,音量被改变,路径取文件,播放位置被改变,播放时间,浏览MP3目录,通用多选对话框,初始化播放列表,设置提示,发送指令,出错信息,取短文件名,取图标指针,关于窗口,多选对话框命令, ======窗口程序集1 || ||------__启动窗口_创建完毕 || ||------启动 || ||------按钮提示组 || ||------注册列表文件 || ||------_图形按钮打开歌曲_被单击 || ||------初始化歌曲 || ||------_图形按钮关闭_被单击 || ||------_图形按钮最小化_被单击 || ||------_图形按钮音量滑块_鼠标左键被放开 || ||------_图形按钮静音_被单击 || ||------音量被改变 || ||------_图形按钮还原_被单击 || ||------_图形按钮播放_被单击 || ||------_时钟_周期事件 || ||------路径取文件 || ||------_图形按钮停止_被单击 || ||------_图形按钮进度滑块_鼠标左键被放开 || ||------播放位置被改变 || ||------_图形按钮音量滑块_鼠标左键被按下 || ||------_图形按钮进度滑块_鼠标左键被按下 || ||------播放时间 || ||------_图形按钮主菜单_被单击 || ||------_关于_被选择 || ||------__启动窗口_位置被改变 || ||------_退出_被选择 || ||------_图形按钮播放列表开关_被单击 || ||------__启动窗口_鼠标右键被按下 || ||------_打开MP3文件_被选择 || ||------_打开目录_被选择 || ||------浏览MP3目录 || ||------通用多选对话框 || ||------_单曲播放_被选择 || ||------_单曲循环_被选择 || ||------_循环播放_被选择 || ||------_图形按钮上一曲_被单击 || ||------_图形按钮下一曲_被单击 || ||------_打开播放列表_被选择 || ||------初始化播放列表 || ||------_拖放对象1_得到文件 || ||------__启动窗口_托盘事件 || || ======窗口程序集2 || ||------_歌曲列表窗口_创建完毕 || ||------设置提示 || ||------_透明标签1_鼠标左键被按下 || ||------_透明标签2_鼠标左键被按下 || ||------_超级列表框1_右键单击表项 || ||------_删除_被选择 || ||------_添加_被选择 || ||------_清空_被选择 || ||------_超级列表框1_被双击 || ||------_单曲播放_被选择 || ||------_单曲重复_被选择 || ||------_循环播放_被选择 || ||------_透明标签7_鼠标左键被按下 || ||------_保存_被选择 || ||------_透明标签3_鼠标左键被按下 || || ======调用的Dll || ||---[dll]------发送指令 || ||---[dll]------出错信息 || ||---[dll]------取短文件名 || ||---[dll]------取图标指针 || ||---[dll]------关于窗口 || ||---[dll]------多选对话框命令 调用的DLL命令: .DLL命令发送指令,整数型,"winmm.dll","mciSendStringA" .参数参数1,文本型 .参数参数2,文本型 .参数参数3,整数型 .参数参数4,整数型 .DLL命令出错信息,,"winmm.dll","mciGetErrorStringA" .参数错误代码,整数型 .参数出错信息,文本型 .参数信息长度,整数型 .DLL命令取短文件名,整数型,"kernel32.dll","GetShortPathNameA" .参数长文件名,文本型 .参数短文件名,文本型 .参数缓冲区长度,整数型 .DLL命令取图标指针,整数型,"shell32.dll","ExtractIconA",,取图标指针 .参数窗口句柄,整数型 .参数文件名称,文本型 .参数图标索引,整数型 .DLL命令关于窗口,整数型,"shell32.dll","ShellAboutA",,调用关于窗口 .参数窗口句柄,整数型 .参数窗口标题,文本型 .参数说明,文本型 .参数图标句柄,整数型 .DLL命令多选对话框命令,整数型,"comdlg32.dll","GetOpenFileNameA" .参数OpenFile,多选对话框