易语言斌少音乐播放器源码

易语言斌少音乐播放器源码系统结构:创建托盘图标,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