易语言API显示歌词源码

系统结构:子程序_载入歌词,子程序_时间标签转换为毫秒,子程序_逻辑2整数,子程序_刷新显示歌词,子程序_区域赋值,子程序_绘制文本,子程序_测量路径文本尺寸,A2W,十六进制到十进制,单十六进制文本到十进制数字,GdiplusShutdown,GdiplusStartup,GdipCreateFromHWND,GdipSetSmoothingMode,GdipDeleteGraphics,GdipCreateFontFamilyFromName,GdipDeleteFontFamily,MultiByteToWideChar,GdipCreateStringFormat,GdipSetStringFormatAlign,GdipSetStringFormatLineAlign,GdipCreateLineBrushFromRectI,GdipCreatePen1,GdipCreatePath,GdipAddPathStringI,lstrlenw,GdipFillPath,GdipDrawPath,GdipDeleteBrush,GdipDeletePath,GdipDeletePen,GdipDeleteStringFormat,GdipDeleteFont,GdipCreateFont,SetWindowLong,SetLayeredWindowAttributes,GetWindowLong,GdipSetTextRenderingHint,GdipSetCompositingQuality,GdipSetInterpolationMode,GdipSetPixelOffsetMode,UpdateLayeredWindow,创建内存场景,取设备场景,创建GDI对象,选入设备场景,Gdi_图形_创建_自HDC,删除对象,删除设备场景,GdipSetClipRectI,GdipGetPathWorldBoundsI,GdipCreateMatrix,GdipDeleteMatrix,GdipCreateSolidFill,BitBlt,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 子程序_载入歌词
           |  |
           |  |------ 子程序_时间标签转换为毫秒
           |  |
           |  |------ 子程序_逻辑2整数
           |  |
           |  |------ 子程序_刷新显示歌词
           |  |
           |  |------ 子程序_区域赋值
           |  |
           |  |------ 子程序_绘制文本
           |  |
           |  |------ 子程序_测量路径文本尺寸
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ A2W
           |  |
           |  |------ 十六进制到十进制
           |  |
           |  |------ 单十六进制文本到十进制数字
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GdiplusShutdown
           |  |
           |  |---[dll]------   GdiplusStartup
           |  |
           |  |---[dll]------   GdipCreateFromHWND
           |  |
           |  |---[dll]------   GdipSetSmoothingMode
           |  |
           |  |---[dll]------   GdipDeleteGraphics
           |  |
           |  |---[dll]------   GdipCreateFontFamilyFromName
           |  |
           |  |---[dll]------   GdipDeleteFontFamily
           |  |
           |  |---[dll]------   MultiByteToWideChar
           |  |
           |  |---[dll]------   GdipCreateStringFormat
           |  |
           |  |---[dll]------   GdipSetStringFormatAlign
           |  |
           |  |---[dll]------   GdipSetStringFormatLineAlign
           |  |
           |  |---[dll]------   GdipCreateLineBrushFromRectI
           |  |
           |  |---[dll]------   GdipCreatePen1
           |  |
           |  |---[dll]------   GdipCreatePath
           |  |
           |  |---[dll]------   GdipAddPathStringI
           |  |
           |  |---[dll]------   lstrlenw
           |  |
           |  |---[dll]------   GdipFillPath
           |  |
           |  |---[dll]------   GdipDrawPath
           |  |
           |  |---[dll]------   GdipDeleteBrush
           |  |
           |  |---[dll]------   GdipDeletePath
           |  |
           |  |---[dll]------   GdipDeletePen
           |  |
           |  |---[dll]------   GdipDeleteStringFormat
           |  |
           |  |---[dll]------   GdipDeleteFont
           |  |
           |  |---[dll]------   GdipCreateFont
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   SetLayeredWindowAttributes
           |  |
           |  |---[dll]------   GetWindowLong
           |  |
           |  |---[dll]------   GdipSetTextRenderingHint
           |  |
           |  |---[dll]------   GdipSetCompositingQuality
           |  |
           |  |---[dll]------   GdipSetInterpolationMode
           |  |
           |  |---[dll]------   GdipSetPixelOffsetMode
           |  |
           |  |---[dll]------   UpdateLayeredWindow
           |  |
           |  |---[dll]------   创建内存场景
           |  |
           |  |---[dll]------   取设备场景
           |  |
           |  |---[dll]------   创建GDI对象
           |  |
           |  |---[dll]------   选入设备场景
           |  |
           |  |---[dll]------   Gdi_图形_创建_自HDC
           |  |
           |  |---[dll]------   删除对象
           |  |
           |  |---[dll]------   删除设备场景
           |  |
           |  |---[dll]------   GdipSetClipRectI
           |  |
           |  |---[dll]------   GdipGetPathWorldBoundsI
           |  |
           |  |---[dll]------   GdipCreateMatrix
           |  |
           |  |---[dll]------   GdipDeleteMatrix
           |  |
           |  |---[dll]------   GdipCreateSolidFill
           |  |
           |  |---[dll]------   BitBlt

  

调用的DLL命令:

.DLL命令 GdiplusShutdown, , "gdiplus.dll", "GdiplusShutdown"
    .参数 token, 整数型

.DLL命令 GdiplusStartup, 整数型, "gdiplus.dll", "GdiplusStartup"
    .参数 token, 整数型, 传址
    .参数 inputbuf, GdiplusStartupInput
    .参数 outputbuf, 整数型

.DLL命令 GdipCreateFromHWND, 整数型, "gdiplus.dll", "GdipCreateFromHWND"
    .参数 hwnd, 整数型
    .参数 graphics, 整数型, 传址

.DLL命令 GdipSetSmoothingMode, 整数型, "GdiPlus.dll", "GdipSetSmoothingMode"
    .参数 graphics, 整数型
    .参数 smoothingMode, 整数型

.DLL命令 GdipDeleteGraphics, 整数型, "gdiplus.dll", "GdipDeleteGraphics"
    .参数 graphics, 整数型

.DLL命令 GdipCreateFontFamilyFromName, 整数型, "gdiplus.dll", "GdipCreateFontFamilyFromName"
    .参数 name, 字节集
    .参数 fontCollection, 整数型
    .参数 fontFamily, 整数型, 传址

.DLL命令 GdipDeleteFontFamily, 整数型, "gdiplus.dll", "GdipDeleteFontFamily"
    .参数 fontFamily, 整数型

.DLL命令 MultiByteToWideChar, 整数型, "kernel32.dll", "MultiByteToWideChar", , 将多媒体字符串映像为通配字符串
    .参数 代码页, 整数型
    .参数 标志, 整数型
    .参数 双字节文本, 文本型
    .参数 双字节文本长度, 整数型
    .参数 宽字符文本, 字节集
    .参数 宽字符文本长度, 整数型

.DLL命令 GdipCreateStringFormat, 整数型, "gdiplus.dll", "GdipCreateStringFormat"
    .参数 formatAttributes, 整数型
    .参数 language, 短整数型
    .参数 StringFormat, 整数型, 传址

.DLL命令 GdipSetStringFormatAlign, 整数型, "gdiplus.dll", "GdipSetStringFormatAlign"
    .参数 StringFormat, 整数型
    .参数 align, 整数型

.DLL命令 GdipSetStringFormatLineAlign, 整数型, "gdiplus", "GdipSetStringFormatLineAlign"
    .参数 StringFormat, 整数型
    .参数 align, 整数型

.DLL命令 GdipCreateLineBrushFromRectI, 整数型, "gdiplus.dll", "GdipCreateLineBrushFromRectI"
    .参数 rect, RectI
    .参数 color1, 整数型
    .参数 color2, 整数型
    .参数 Mode, 整数型
    .参数 WrapMd, 整数型
    .参数 lineGradient, 整数型, 传址

.DLL命令 GdipCreatePen1, 整数型, "gdiplus.dll", "GdipCreatePen1"
    .参数 color, 整数型
    .参数 Width, 小数型
    .参数 unit, 整数型
    .参数 pen, 整数型, 传址

.DLL命令 GdipCreatePath, 整数型, "gdiplus.dll", "GdipCreatePath"
    .参数 brushmode, 整数型
    .参数 path, 整数型, 传址

.DLL命令 GdipAddPathStringI, 整数型, "gdiplus.dll", "GdipAddPathStringI"
    .参数 path, 整数型
    .参数 str, 字节集
    .参数 Length, 整数型
    .参数 family, 整数型
    .参数 style, 整数型
    .参数 emSize, 小数型
    .参数 layoutRect, RectI
    .参数 StringFormat, 整数型

.DLL命令 lstrlenw, 整数型, "kernel32.dll", "lstrlenW", , 取宽文本长度
    .参数 dqcs, 字节集, , 文本指针

.DLL命令 GdipFillPath, 整数型, "gdiplus.dll", "GdipFillPath"
    .参数 graphics, 整数型
    .参数 Brush, 整数型
    .参数 path, 整数型

.DLL命令 GdipDrawPath, 整数型, "gdiplus.dll", "GdipDrawPath"
    .参数 graphics, 整数型
    .参数 pen, 整数型
    .参数 path, 整数型

.DLL命令 GdipDeleteBrush, 整数型, "GdiPlus.dll", "GdipDeleteBrush"
    .参数 brush, 整数型

.DLL命令 GdipDeletePath, 整数型, "gdiplus.dll", "GdipDeletePath"
    .参数 path, 整数型

.DLL命令 GdipDeletePen, 整数型, "GdiPlus.dll", "GdipDeletePen"
    .参数 pen, 整数型

.DLL命令 GdipDeleteStringFormat, 整数型, "gdiplus.dll", "GdipDeleteStringFormat"
    .参数 StringFormat, 整数型

.DLL命令 GdipDeleteFont, 整数型, "gdiplus.dll", "GdipDeleteFont"
    .参数 curFont, 整数型

.DLL命令 GdipCreateFont, 整数型, "gdiplus.dll", "GdipCreateFont"
    .参数 fontFamily, 整数型
    .参数 emSize, 小数型
    .参数 style, 整数型
    .参数 unit, 整数型
    .参数 createdfont, 整数型, 传址

.DLL命令 SetWindowLong, 整数型, "user32.dll", "SetWindowLongA"
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 整数型

.DLL命令 SetLayeredWindowAttributes, 整数型, "user32.dll", "SetLayeredWindowAttributes"
    .参数 hWnd, 整数型
    .参数 CrKey, 整数型
    .参数 bAlpha, 字节型
    .参数 dwFlags, 整数型

.DLL命令 GetWindowLong, 整数型, "user32.dll", "GetWindowLongA"
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型

.DLL命令 GdipSetTextRenderingHint, 整数型, "GdiPlus.dll", "GdipSetTextRenderingHint"
    .参数 graphics, 整数型
    .参数 mode, 整数型

.DLL命令 GdipSetCompositingQuality, 整数型, "gdiplus", "GdipSetCompositingQuality"
    .参数 graphics, 整数型
    .参数 CompositingQlty, 整数型

.DLL命令 GdipSetInterpolationMode, 整数型, "gdiplus", "GdipSetInterpolationMode"
    .参数 graphics, 整数型
    .参数 interpolation, 整数型

.DLL命令 GdipSetPixelOffsetMode, 整数型, "gdiplus", "GdipSetPixelOffsetMode"
    .参数 graphics, 整数型
    .参数 pixelOffsetMode, 整数型

.DLL命令 UpdateLayeredWindow, 整数型, "user32.dll", "UpdateLayeredWindow"
    .参数 窗口句柄, 整数型, , 当前窗口的句柄
    .参数 目标设备场景句柄, 整数型, , 当前窗口的DC
    .参数 左上角位置, 坐标L, , 当前窗口在屏幕的左上角位置(相当于 ::SetWindowPos()函数)
    .参数 窗口尺寸, 尺寸L, , 当前窗口在的宽度和高度
    .参数 源缓存DC, 整数型, , 内存缓存DC
    .参数 内存缓存左上角坐标, 坐标L
    .参数 crKey, 整数型, , 透明颜色值
    .参数 混合样式, BLENDFUNCTION, , 混合样式
    .参数 dwFlags, 整数型, , 一组标志位常量

.DLL命令 创建内存场景, 整数型, "gdi32", "CreateCompatibleDC", , 创建一个与特定设备场景一致的内存设备场景  新设备场景句柄，若出错则为零
    .参数 hdc, 整数型, , 设备场景句柄。新的设备场景将与它一致。也可能为0以创建一个与屏幕一致的设备场景;

.DLL命令 取设备场景, 整数型, "user32.dll", "GetDC", , 出错则为0
    .参数 窗口句柄, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC

.DLL命令 创建GDI对象, 整数型, "gdi32.dll", "CreateDIBSection"
    .参数 设备场景句柄, 整数型
    .参数 pBitmapInfo, BITMAPINFO, 传址
    .参数 常数, 整数型
    .参数 内存地址, 整数型
    .参数 文件映射句柄, 整数型
    .参数 偏移量, 整数型

.DLL命令 选入设备场景, 整数型, "gdi32.dll", "SelectObject", , SelectObject
    .参数 场景句柄, 整数型
    .参数 对象句柄, 整数型

.DLL命令 Gdi_图形_创建_自HDC, 整数型, "gdiplus", "GdipCreateFromHDC"
    .参数 hDC, 整数型
    .参数 graphics, 整数型, 传址

.DLL命令 删除对象, 整数型, "gdi32.dll", "DeleteObject"
    .参数 对象句柄, , , 一个GDI对象的句柄

.DLL命令 删除设备场景, 整数型, "gdi32.dll", "DeleteDC"
    .参数 设备场景句柄, 整数型, , 将要删除的设备场景

.DLL命令 GdipSetClipRectI, 整数型, "gdiplus.dll", "GdipSetClipRectI"
    .参数 graphics, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 Width, 整数型
    .参数 Height, 整数型
    .参数 CombineMd, 整数型

.DLL命令 GdipGetPathWorldBoundsI, 整数型, "gdiplus", "GdipGetPathWorldBoundsI"
    .参数 path, 整数型
    .参数 bounds, RectI, 传址
    .参数 matrix, 整数型
    .参数 pen, 整数型

.DLL命令 GdipCreateMatrix, 整数型, "gdiplus", "GdipCreateMatrix"
    .参数 matrix, 整数型, 传址

.DLL命令 GdipDeleteMatrix, 整数型, "gdiplus", "GdipDeleteMatrix"
    .参数 matrix, 整数型

.DLL命令 GdipCreateSolidFill, 整数型, "GdiPlus.dll", "GdipCreateSolidFill"
    .参数 color, 整数型
    .参数 brush, 整数型, 传址

.DLL命令 BitBlt, 整数型, "gdi32", "BitBlt"
    .参数 hDestDC, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hSrcDC, 整数型
    .参数 xSrc, 整数型
    .参数 ySrc, 整数型
    .参数 dwRop, 整数型