易语言斌少音乐播放器源码
系统结构:创建托盘图标,NewProc,气泡提示,搜寻,加载列表,取歌名,删除全部,播放,删除,画文本,消息处理子程序,对话框_打开文件,A2W,RGB到ARGB,关闭GDI绘图,启动GDI绘图,载入,取单句歌词,冒泡排序,取歌词内容,取纯文本内容,取标签值,取时间补偿值,置时间补偿值,CreateCompatibleDC,更新窗口层,创建GDI对象_,删除对象_,选入设备场景_,Gdi_图形_创建_自HDC,Gdi_图形_置呈现模式,Gdi_字体成员_创建_自名称,Gdi_图像_创建位图_自文件,Gdi_图形_画图像_缩放,Gdi_图像_销毁,Gdi_路径_创建,Gdi_路径_加入文本,Gdi_画笔_创建_自颜色,Gdi_刷子_创建_固色画刷,Gdi_图形_画路径,Gdi_图形_填充路径,Gdi_画笔_销毁,Gdi_刷子_销毁,Gdi_路径_销毁,Gdi_刷子_创建_线性渐变画刷,Gdi_刷子_创建_线性渐变画刷_自矩形,Gdi_区域_创建_自矩形,Gdi_区域_销毁,Gdi_图形_置剪辑区域_自区域,取得窗口信息_,设置窗口信息_,Gdi_图形_销毁,删除设备场景_,InternetGetConnectedState,InternetOpenA,InternetOpenUrlA,HttpQueryInfoA,InternetCloseHandle,InternetReadFile,SkinH_Attach,Shell_NotifyIconA,lstrcpyn,SetWindowLongA,RegisterWindowMessageA,CallWindowProcA,GdipDeleteFontFamily,GdiplusStartup,GdiplusShutdown,MultiByteToWideChar,取设备场景_,ReleaseDC,GetOpenFileName,LocalSize_OPENFILENAME,PathRemoveFileSpec,PathRemoveExtension,FindWindowEx,SetWindowText,GetParent,系统状态栏信息_,
======窗口程序集1
| |
| |------ _图形按钮3_被单击
| |
| |------ _图形按钮4_被单击
| |
| |------ _图形按钮5_被单击
| |
| |------ _图形按钮6_被单击
| |
| |------ _图形按钮7_被单击
| |
| |------ _图形按钮8_被单击
| |
| |------ _图形按钮10_被单击
| |
| |------ _图形按钮9_被单击
| |
| |------ _主窗口_创建完毕
| |
| |------ _时钟1_周期事件
| |
| |------ _滑块条1_鼠标左键被按下
| |
| |------ _滑块条1_鼠标左键被放开
| |
| |------ _滑块条1_位置被改变
| |
| |------ _播放按钮_被单击
| |
| |------ _时钟2_周期事件
| |
| |------ 创建托盘图标
| |
| |------ _图形按钮1_被单击
| |
| |------ NewProc
| |
| |------ 气泡提示
| |
| |------ _主窗口_将被销毁
| |
| |------ _添加歌曲_被单击
| |
| |------ _歌曲目录_被选择
| |
| |------ 搜寻
| |
| |------ 加载列表
| |
| |------ 取歌名
| |
| |------ 删除全部
| |
| |------ _添加目录_被单击
| |
| |------ _列表框1_双击选择
| |
| |------ 播放
| |
| |------ _删除全部_被单击
| |
| |------ 删除
| |
| |------ _删除当前_被选择
| |
| |------ _删除_被单击
| |
| |------ _图形按钮2_被单击
| |
| |------ _时钟5_周期事件
| |
| |------ _透明标签8_鼠标右键被按下
| |
| |
======窗口程序集2
| |
| |------ _桌面歌词_创建完毕
| |
| |------ 画文本
| |
| |------ _桌面歌词_将被销毁
| |
| |------ _桌面歌词_鼠标右键被放开
| |
| |------ _返回歌词秀_被选择
| |
| |
======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |------ 消息处理子程序
| |
| |------ 对话框_打开文件
| |
| |------ A2W
| |
| |------ RGB到ARGB
| |
| |------ 关闭GDI绘图
| |
| |------ 启动GDI绘图
| |
| |
======歌词处理类
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 载入
| |
| |------ 取单句歌词
| |
| |------ 冒泡排序
| |
| |------ 取歌词内容
| |
| |------ 取纯文本内容
| |
| |------ 取标签值
| |
| |------ 取时间补偿值
| |
| |------ 置时间补偿值
| |
| |
======窗口程序集3
| |
| |------ _关闭_被单击
| |
| |
======调用的Dll
| |
| |---[dll]------ CreateCompatibleDC
| |
| |---[dll]------ 更新窗口层
| |
| |---[dll]------ 创建GDI对象_
| |
| |---[dll]------ 删除对象_
| |
| |---[dll]------ 选入设备场景_
| |
| |---[dll]------ Gdi_图形_创建_自HDC
| |
| |---[dll]------ Gdi_图形_置呈现模式
| |
| |---[dll]------ Gdi_字体成员_创建_自名称
| |
| |---[dll]------ Gdi_图像_创建位图_自文件
| |
| |---[dll]------ Gdi_图形_画图像_缩放
| |
| |---[dll]------ Gdi_图像_销毁
| |
| |---[dll]------ Gdi_路径_创建
| |
| |---[dll]------ Gdi_路径_加入文本
| |
| |---[dll]------ Gdi_画笔_创建_自颜色
| |
| |---[dll]------ Gdi_刷子_创建_固色画刷
| |
| |---[dll]------ Gdi_图形_画路径
| |
| |---[dll]------ Gdi_图形_填充路径
| |
| |---[dll]------ Gdi_画笔_销毁
| |
| |---[dll]------ Gdi_刷子_销毁
| |
| |---[dll]------ Gdi_路径_销毁
| |
| |---[dll]------ Gdi_刷子_创建_线性渐变画刷
| |
| |---[dll]------ Gdi_刷子_创建_线性渐变画刷_自矩形
| |
| |---[dll]------ Gdi_区域_创建_自矩形
| |
| |---[dll]------ Gdi_区域_销毁
| |
| |---[dll]------ Gdi_图形_置剪辑区域_自区域
| |
| |---[dll]------ 取得窗口信息_
| |
| |---[dll]------ 设置窗口信息_
| |
| |---[dll]------ Gdi_图形_销毁
| |
| |---[dll]------ 删除设备场景_
| |
| |---[dll]------ InternetGetConnectedState
| |
| |---[dll]------ InternetOpenA
| |
| |---[dll]------ InternetOpenUrlA
| |
| |---[dll]------ HttpQueryInfoA
| |
| |---[dll]------ InternetCloseHandle
| |
| |---[dll]------ InternetReadFile
| |
| |---[dll]------ SkinH_Attach
| |
| |---[dll]------ Shell_NotifyIconA
| |
| |---[dll]------ lstrcpyn
| |
| |---[dll]------ SetWindowLongA
| |
| |---[dll]------ RegisterWindowMessageA
| |
| |---[dll]------ CallWindowProcA
| |
| |---[dll]------ GdipDeleteFontFamily
| |
| |---[dll]------ GdiplusStartup
| |
| |---[dll]------ GdiplusShutdown
| |
| |---[dll]------ MultiByteToWideChar
| |
| |---[dll]------ 取设备场景_
| |
| |---[dll]------ ReleaseDC
| |
| |---[dll]------ GetOpenFileName
| |
| |---[dll]------ LocalSize_OPENFILENAME
| |
| |---[dll]------ PathRemoveFileSpec
| |
| |---[dll]------ PathRemoveExtension
| |
| |---[dll]------ FindWindowEx
| |
| |---[dll]------ SetWindowText
| |
| |---[dll]------ GetParent
| |
| |---[dll]------ 系统状态栏信息_
调用的DLL命令:
.DLL命令 CreateCompatibleDC, 整数型, "gdi32", "CreateCompatibleDC", , 创建一个与特定设备场景一致的内存设备场景 新设备场景句柄,若出错则为零
.参数 hdc, 整数型, , 设备场景句柄。新的设备场景将与它一致。也可能为0以创建一个与屏幕一致的设备场景;
.DLL命令 更新窗口层, 整数型, "user32.dll", "UpdateLayeredWindow", 公开
.参数 句柄, 整数型, , 当前窗口的句柄
.参数 设备场景句柄, 整数型, , 当前窗口的DC
.参数 左上角位置, 坐标_, , 当前窗口在屏幕的左上角位置(相当于 ::SetWindowPos()函数)
.参数 窗口尺寸, 尺寸_, , 当前窗口在的宽度和高度
.参数 缓存DC, 整数型, , 内存缓存DC
.参数 内存缓存左上角坐标, 坐标_, , 内存缓存的左上角坐标(可用于裁剪内存缓存)
.参数 crKey, 整数型
.参数 混合样式, 混合函数结构, , 混合样式
.参数 dwFlags, 整数型
.DLL命令 创建GDI对象_, 整数型, "gdi32.dll", "CreateDIBSection", 公开
.参数 设备场景句柄, 整数型
.参数 pBitmapInfo, BITMAPINFO, 传址
.参数 常数, 整数型
.参数 内存地址, 整数型
.参数 文件映射句柄, 整数型
.参数 偏移量, 整数型
.DLL命令 删除对象_, 整数型, "gdi32.dll", "DeleteObject", 公开, , DeleteObject
.参数 对象句柄, 整数型, , hObject,一个GDI对象的句柄
.DLL命令 选入设备场景_, 整数型, "gdi32.dll", "SelectObject", 公开, , SelectObject
.参数 场景句柄, 整数型, , hdc
.参数 对象句柄, 整数型, , hobject
.DLL命令 Gdi_图形_创建_自HDC, 整数型, "GdiPlus.dll", "GdipCreateFromHDC", 公开
.参数 hdc, 整数型
.参数 graphics, 整数型, 传址
.DLL命令 Gdi_图形_置呈现模式, 整数型, "GdiPlus.dll", "GdipSetSmoothingMode", 公开
.参数 graphics, 整数型
.参数 smoothingMode, 整数型
.DLL命令 Gdi_字体成员_创建_自名称, 整数型, "GdiPlus.dll", "GdipCreateFontFamilyFromName", 公开
.参数 name, 字节集
.参数 fontCollection, 整数型
.参数 FontFamily, 整数型, 传址
.DLL命令 Gdi_图像_创建位图_自文件, 整数型, "GdiPlus.dll", "GdipCreateBitmapFromFile", 公开
.参数 filename, 字节集
.参数 bitmap, 整数型, 传址
.DLL命令 Gdi_图形_画图像_缩放, 整数型, "GdiPlus.dll", "GdipDrawImageRect", 公开
.参数 graphics, 整数型
.参数 image, 整数型
.参数 x, 小数型
.参数 y, 小数型
.参数 width, 小数型
.参数 height, 小数型
.DLL命令 Gdi_图像_销毁, 整数型, "GdiPlus.dll", "GdipDisposeImage", 公开
.参数 image, 整数型
.DLL命令 Gdi_路径_创建, 整数型, "GdiPlus.dll", "GdipCreatePath", 公开
.参数 brushMode, 整数型
.参数 path, 整数型, 传址
.DLL命令 Gdi_路径_加入文本, 整数型, "GdiPlus.dll", "GdipAddPathString", 公开
.参数 path, 整数型
.参数 string, 字节集
.参数 length, 整数型
.参数 family, 整数型
.参数 style, 整数型
.参数 emSize, 小数型
.参数 layoutRect, RectF
.参数 format, 整数型
.DLL命令 Gdi_画笔_创建_自颜色, 整数型, "GdiPlus.dll", "GdipCreatePen1", 公开
.参数 color, 整数型
.参数 width, 小数型
.参数 unit, 整数型
.参数 pen, 整数型, 传址
.DLL命令 Gdi_刷子_创建_固色画刷, 整数型, "GdiPlus.dll", "GdipCreateSolidFill", 公开
.参数 color, 整数型
.参数 brush, 整数型, 传址
.DLL命令 Gdi_图形_画路径, 整数型, "GdiPlus.dll", "GdipDrawPath", 公开
.参数 graphics, 整数型
.参数 pen, 整数型
.参数 path, 整数型
.DLL命令 Gdi_图形_填充路径, 整数型, "GdiPlus.dll", "GdipFillPath", 公开
.参数 graphics, 整数型
.参数 brush, 整数型
.参数 path, 整数型
.DLL命令 Gdi_画笔_销毁, 整数型, "GdiPlus.dll", "GdipDeletePen", 公开
.参数 pen, 整数型
.DLL命令 Gdi_刷子_销毁, 整数型, "GdiPlus.dll", "GdipDeleteBrush", 公开
.参数 brush, 整数型
.DLL命令 Gdi_路径_销毁, 整数型, "GdiPlus.dll", "GdipDeletePath", 公开
.参数 path, 整数型
.DLL命令 Gdi_刷子_创建_线性渐变画刷, 整数型, "GdiPlus.dll", "GdipCreateLineBrush", 公开
.参数 point1, PointF
.参数 point2, PointF
.参数 color1, 整数型
.参数 color2, 整数型
.参数 wrapMode, 整数型
.参数 lineGradient, 整数型, 传址
.DLL命令 Gdi_刷子_创建_线性渐变画刷_自矩形, 整数型, "GdiPlus.dll", "GdipCreateLineBrushFromRect", 公开
.参数 rect, RectF
.参数 color1, 整数型
.参数 color2, 整数型
.参数 mode, 整数型
.参数 wrapMode, 整数型
.参数 lineGradient, 整数型, 传址
.DLL命令 Gdi_区域_创建_自矩形, 整数型, "GdiPlus.dll", "GdipCreateRegionRect", 公开
.参数 rect, RectF
.参数 region, 整数型, 传址
.DLL命令 Gdi_区域_销毁, 整数型, "GdiPlus.dll", "GdipDeleteRegion", 公开
.参数 region, 整数型
.DLL命令 Gdi_图形_置剪辑区域_自区域, 整数型, "GdiPlus.dll", "GdipSetClipRegion", 公开
.参数 graphics, 整数型
.参数 region, 整数型
.参数 combineMode, 整数型
.DLL命令 取得窗口信息_, 整数型, "user32", "GetWindowLongA", 公开, , 从指定窗口的结构中取得信息 由nIndex决定。零表示出错。会设置GetLastError
.参数 窗口句柄, 整数型, , 欲为其获取信息的窗口的句柄
.参数 属性, 整数型, , 欲取回的信息,可以是下述任何一个常数:;GWL_EXSTYLE:扩展窗口样式;GWL_STYLE:窗口样式;GWL_WNDPROC:该窗口的窗口函数的地址;GWL_HINSTANCE:拥有窗口的实例的句柄;GWL_HWNDPARENT:该窗口之父的句柄。不要用SetWindowWord来改变这个值;GWL_ID:对话框中一个子窗口的标识符;GWL_USERDATA:含义由应用程序规定;DWL_DLGPROC:这个窗口的对话框函数地址;DWL_MSGRESULT:在对话框函数中处理的一条消息返回的值;DWL_USER:含义由应用程序规定;
.DLL命令 设置窗口信息_, 整数型, "user32", "SetWindowLongA", 公开, , 在窗口结构中为指定的窗口设置信息 指定数据的前一个值
.参数 窗口句柄, 整数型, , hwnd,欲为其取得信息的窗口的句柄
.参数 窗口信息值, 整数型, , nIndex,请参考GetWindowLong函数的nIndex参数的说明
.参数 窗口信息新值, 整数型, , dwNewLong,由nIndex指定的窗口信息的新值
.DLL命令 Gdi_图形_销毁, 整数型, "GdiPlus.dll", "GdipDeleteGraphics", 公开
.参数 graphics, 整数型
.DLL命令 删除设备场景_, 整数型, "gdi32.dll", "DeleteDC", 公开, ,
.参数 设备场景句柄, 整数型, , hdc,将要删除的设备场景
.DLL命令 InternetGetConnectedState, , "Wininet.dll", "InternetGetConnectedState"
.参数 lpdwFlags, 整数型, 传址
.参数 dwReserved, 整数型
.DLL命令 InternetOpenA, 整数型, "Wininet.dll", "InternetOpenA"
.参数 lpszAgent, 文本型
.参数 dwAccessType, 整数型
.参数 lpszProxyName, 整数型
.参数 lpszProxyBypass, 整数型
.参数 dwFlags, 整数型
.DLL命令 InternetOpenUrlA, 整数型, "Wininet.dll", "InternetOpenUrlA"
.参数 hInternet, 整数型
.参数 lpszUrl, 文本型
.参数 lpszHeaders, 文本型
.参数 dwHeadersLength, 整数型
.参数 dwFlags, 整数型
.参数 dwContext, 整数型
.DLL命令 HttpQueryInfoA, 整数型, "Wininet.dll", "HttpQueryInfoA"
.参数 hRequest, 整数型
.参数 dwInfoLevel, 整数型
.参数 lpvBuffer, 整数型, 传址
.参数 lpdwBufferLength, 整数型, 传址
.参数 lpdwIndex, 整数型, 传址
.DLL命令 InternetCloseHandle, , "Wininet.dll", "InternetCloseHandle"
.参数 handle, 整数型
.DLL命令 InternetReadFile, 整数型, "Wininet.dll", "InternetReadFile"
.参数 hFile, 整数型
.参数 lpBuffer, 字节集
.参数 dwNumberOfBytesToRead, 整数型
.参数 lpdwNumberOfBytesRead, 整数型, 传址
.DLL命令 SkinH_Attach, 逻辑型, "SkinH_EL.dll", "SkinH_Attach"
.DLL命令 Shell_NotifyIconA, 整数型, , "Shell_NotifyIconA"
.参数 dwMessage, 整数型
.参数 pnid, NotifyIconData
.DLL命令 lstrcpyn, 整数型, , "lstrcpyn"
.参数 lpString1, 字节型, 数组
.参数 lpString2, 文本型
.参数 iMaxLength, 整数型
.DLL命令 SetWindowLongA, 整数型, , "SetWindowLongA"
.参数 hwnd, 整数型
.参数 nIndex, 整数型
.参数 dwNewLong, 整数型
.DLL命令 RegisterWindowMessageA, 整数型, , "RegisterWindowMessageA"
.参数 lpString, 文本型
.DLL命令 CallWindowProcA, 整数型, , "CallWindowProcA"
.参数 lpPrevWndFunc, 整数型
.参数 hWnd, 整数型
.参数 Msg, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型
.DLL命令 GdipDeleteFontFamily, 整数型, "GdiPlus.dll", "GdipDeleteFontFamily"
.参数 FontFamily, 整数型
.DLL命令 GdiplusStartup, 整数型, "gdiplus.dll", "GdiplusStartup"
.参数 token, 整数型, 传址
.参数 inputbuf, GdiplusStartupInput
.参数 outputbuf, 整数型
.DLL命令 GdiplusShutdown, , "gdiplus.dll", "GdiplusShutdown"
.参数 token, 整数型
.DLL命令 MultiByteToWideChar, 整数型, , "MultiByteToWideChar"
.参数 CodePage, 整数型
.参数 dwFlags, 整数型
.参数 lpMultiByteStr, 文本型
.参数 cchMultiByte, 整数型
.参数 lpWideCharStr, 字节集
.参数 cchWideChar, 整数型
.DLL命令 取设备场景_, 整数型, "user32", "GetDC", 公开, 获取指定窗口的设备场景 指定窗口的设备场景句柄,出错则为0
.参数 窗口的句柄, 整数型, , 将获取其设备场景的窗口的句柄。若为0,则要获取整个屏幕的DC;
.DLL命令 ReleaseDC, 整数型, "user32", "ReleaseDC", , 释放由调用GetDC或GetWindowDC函数获取的指定设备场景。它对类或私有设备场景无效(但这样的调用不会造成损害) 执行成功为1,否则为0
.参数 hwnd, 整数型, , 要释放的设备场景相关的窗口句柄
.参数 hdc, 整数型, , 要释放的设备场景句柄;
.DLL命令 GetOpenFileName, 整数型, "Comdlg32.dll", "GetOpenFileNameA"
.参数 pOpenfilename, OPENFILENAME, 传址
.DLL命令 LocalSize_OPENFILENAME, 整数型, , "LocalSize"
.参数 hMem, OPENFILENAME
.DLL命令 PathRemoveFileSpec, 整数型, "Shlwapi.dll", "PathRemoveFileSpecA"
.参数 pszPath, 文本型
.DLL命令 PathRemoveExtension, , "Shlwapi.dll", "PathRemoveExtensionA"
.参数 pszPath, 文本型
.DLL命令 FindWindowEx, 整数型, "user32", "FindWindowExA", , 在窗口列表中寻找与指定条件相符的第一个子窗口 找到的窗口的句柄。如未找到相符窗口,则返回零。会设置GetLastError
.参数 hWnd1, 整数型, , 在其中查找子的父窗口。如设为零,表示使用桌面窗口(通常说的顶级窗口都被认为是桌面的子窗口,所以也会对它们进行查找)
.参数 hWnd2, 整数型, , 从这个窗口后开始查找。这样便可利用对FindWindowEx的多次调用找到符合条件的所有子窗口。如设为零,表示从第一个子窗口开始搜索
.参数 lpsz1, 文本型, , 欲搜索的类名。零表示忽略
.参数 lpsz2, 文本型, , 欲搜索的类名。零表示忽略;
.DLL命令 SetWindowText, 整数型, "user32", "SetWindowTextA", , 设置窗口的标题文字或控件的内容(在vb里使用:针对vb窗体,应使用caption或text属性) 非零表示成功,零表示失败。会设置GetLastError
.参数 hwnd, 整数型, , 要设置文字的窗口的句柄
.参数 lpString, 文本型, , 要设到hwnd窗口中的文字;
.DLL命令 GetParent, 整数型, "user32", "GetParent", , 判断指定窗口的父窗口 父窗口的句柄。如窗口没有父,或遇到错误,则返回零。会设置GetLastError
.参数 hwnd, 整数型, , 欲测试的窗口的句柄;
.DLL命令 系统状态栏信息_, 整数型, "shell32.dll", "SHAppBarMessage", , SHAppBarMessage
.参数 信息值, 整数型, , dwMessage
.参数 数据结构, 状态栏信息, , pData
易语言类QQ窗口源码,类QQ窗口...
易语言电子蚊香源码,beep...
易语言歌词秀源码,排序LRC时间内容,MCI控制...
易语言会打字就会弹钢琴码重发正传源码,设置编辑框只读状态,构造乐谱列表,取常量中的每分钟拍数,取常量中的乐谱,置MIDI组件,演奏音符,停止演奏音符,处理按下某键,处理放开某键,构造...
易语言摄像头演示源码,capCreateCaptureWindow,SendMessageStr,SendMessage...
排序LRC时间内容,MCI控制...
简易MP3播放器源码...
设置编辑框只读状态,构造乐谱列表,取常量中的每分钟拍数,取常量中的乐谱,置MIDI组件,演奏音符,停止演奏音符,处理按下某键,处理放开某键,构造音符对照表,添加键代码音符对,添加字符音符对,查询键代码对应音符,播放乐谱,计算音符播放时间,停止播放乐谱...
出题,标签显示,提示,音乐程序...