易语言自绘列表框源码

系统结构:自绘列表框_初始化,自绘列表框_释放,自绘列表框_消息处理,MakeRect,自绘列表框_清空,自绘列表框_加入项目,SetWindowLong,CallWindowProc,RtlMoveMemory,CreateSolidBrush,DeleteObject,MoveToEx,LineTo,SelectObject,CreatePen,FillRect,FrameRect,TransparentBlt,CreateCompatibleDC,DeleteDC,ExtTextOut,CreateFont,SetBkMode,SetTextColor,

======程序集_自绘列表框
           |  |
           |  |------ 自绘列表框_初始化
           |  |
           |  |------ 自绘列表框_释放
           |  |
           |  |------ 自绘列表框_消息处理
           |  |
           |  |------ MakeRect
           |  |
           |  |------ 自绘列表框_清空
           |  |
           |  |------ 自绘列表框_加入项目
           |  |
           |  |
======程序集_启动窗口
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ _选择列表框1_双击选择
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   RtlMoveMemory
           |  |
           |  |---[dll]------   CreateSolidBrush
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   MoveToEx
           |  |
           |  |---[dll]------   LineTo
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   CreatePen
           |  |
           |  |---[dll]------   FillRect
           |  |
           |  |---[dll]------   FrameRect
           |  |
           |  |---[dll]------   TransparentBlt
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   ExtTextOut
           |  |
           |  |---[dll]------   CreateFont
           |  |
           |  |---[dll]------   SetBkMode
           |  |
           |  |---[dll]------   SetTextColor

调用的DLL命令:

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

.DLL命令 CallWindowProc, 整数型, "user32.dll", "CallWindowProcA"
    .参数 lpPrevWndFunc, 整数型
    .参数 hWnd, 整数型
    .参数 uMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 RtlMoveMemory, 整数型, "kernel32.dll", "RtlMoveMemory"
    .参数 lpvDest, DRAWITEMSTRUCT
    .参数 lpvSource, 整数型
    .参数 cbCopy, 整数型

.DLL命令 CreateSolidBrush, 整数型, "gdi32.dll", "CreateSolidBrush"
    .参数 crColor, 整数型

.DLL命令 DeleteObject, 整数型, "gdi32.dll", "DeleteObject"
    .参数 hObject, 整数型

.DLL命令 MoveToEx, 整数型, "gdi32.dll", "MoveToEx"
    .参数 hDC, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 point, 整数型

.DLL命令 LineTo, 整数型, "gdi32.dll", "LineTo"
    .参数 hDC, 整数型
    .参数 x, 整数型
    .参数 y, 整数型

.DLL命令 SelectObject, 整数型, "gdi32.dll", "SelectObject"
    .参数 hDC, 整数型
    .参数 hObject, 整数型

.DLL命令 CreatePen, 整数型, "gdi32.dll", "CreatePen"
    .参数 fnPenStyle, 整数型
    .参数 nWidth, 整数型
    .参数 crColor, 整数型

.DLL命令 FillRect, 整数型, "user32.dll", "FillRect"
    .参数 hDC, 整数型
    .参数 lpRect, RECT
    .参数 hBrush, 整数型

.DLL命令 FrameRect, 整数型, "user32.dll", "FrameRect"
    .参数 hDC, 整数型
    .参数 lpRect, RECT
    .参数 hBrush, 整数型

.DLL命令 TransparentBlt, 整数型, "msimg32.dll", "TransparentBlt"
    .参数 hDestDC, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hSrcDC, 整数型
    .参数 xSrc, 整数型
    .参数 ySrc, 整数型
    .参数 sWidth, 整数型
    .参数 sHeight, 整数型
    .参数 crTransparent, 整数型

.DLL命令 CreateCompatibleDC, 整数型, "gdi32.dll", "CreateCompatibleDC"
    .参数 hDC, 整数型

.DLL命令 DeleteDC, 整数型, "gdi32.dll", "DeleteDC"
    .参数 hDC, 整数型

.DLL命令 ExtTextOut, 整数型, "gdi32.dll", "ExtTextOutA"
    .参数 hDC, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 wOptions, 整数型
    .参数 lpRect, RECT
    .参数 lpString, 文本型
    .参数 nCount, 整数型
    .参数 lpDx, 整数型

.DLL命令 CreateFont, 整数型, "gdi32.dll", "CreateFontA"
    .参数 参数_字体高度, 整数型
    .参数 参数_字体宽度, 整数型
    .参数 参数_角度, 整数型
    .参数 参数_角度2, 整数型
    .参数 参数_粗细, 整数型
    .参数 参数_斜体, 逻辑型
    .参数 参数_下划线, 逻辑型
    .参数 参数_删除线, 逻辑型
    .参数 参数_字符集, 字节型
    .参数 参数_输出精度, 字节型
    .参数 参数_剪切精度, 字节型
    .参数 参数_输出质量, 字节型
    .参数 参数_字符间距, 字节型
    .参数 参数_字体名称, 文本型

.DLL命令 SetBkMode, 整数型, "gdi32.dll", "SetBkMode"
    .参数 hDC, 整数型
    .参数 nBkMode, 整数型

.DLL命令 SetTextColor, 整数型, "gdi32.dll", "SetTextColor"
    .参数 hDC, 整数型
    .参数 crColor, 整数型