易语言超级列表框自绘源码

系统结构:Caiyy_初始化,Caiyy_加入项目,超级浏览框_子类,父窗口_OnMessage,父窗口_OnNotify,取单元格矩形,取文本指针,ImageList_Create,API_SetWindowLongA,CallWindowProc,CopyMemory_NMLVCUSTOMDRAW,Size_NMLVCUSTOMDRAW,CopyMemory_LV_ITEM,Size_LV_ITEM,API_SendMessageA,API_GetSubItemRect,lstrcpyn_文本,lstrcpyn_xx,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======Caiyy_超列类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ Caiyy_初始化
           |  |
           |  |------ Caiyy_加入项目
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮4_被单击
           |  |
           |  |------ _超级列表框1_当前表项被改变
           |  |
           |  |
======程序集2
           |  |
           |  |------ 超级浏览框_子类
           |  |
           |  |------ 父窗口_OnMessage
           |  |
           |  |------ 父窗口_OnNotify
           |  |
           |  |------ 取单元格矩形
           |  |
           |  |
======help
           |  |
           |  |------ 取文本指针
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   ImageList_Create
           |  |
           |  |---[dll]------   API_SetWindowLongA
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   CopyMemory_NMLVCUSTOMDRAW
           |  |
           |  |---[dll]------   Size_NMLVCUSTOMDRAW
           |  |
           |  |---[dll]------   CopyMemory_LV_ITEM
           |  |
           |  |---[dll]------   Size_LV_ITEM
           |  |
           |  |---[dll]------   API_SendMessageA
           |  |
           |  |---[dll]------   API_GetSubItemRect
           |  |
           |  |---[dll]------   lstrcpyn_文本
           |  |
           |  |---[dll]------   lstrcpyn_xx

调用的DLL命令:

.DLL命令 ImageList_Create, 整数型, "comctl32.dll", "ImageList_Create"
    .参数 cx, 整数型
    .参数 cy, 整数型
    .参数 flags, 整数型
    .参数 cInitial, 整数型
    .参数 cGrow, 整数型

.DLL命令 API_SetWindowLongA, 子程序指针, , "SetWindowLongA"
    .参数 窗口句柄, 整数型
    .参数 要置的特征, 整数型
    .参数 新特征, 子程序指针, , 仅易语言3.0支持

.DLL命令 CallWindowProc, 整数型, , "CallWindowProcA"
    .参数 程序指针, 子程序指针
    .参数 窗口句柄, 整数型
    .参数 消息, 整数型
    .参数 参数1, 整数型
    .参数 参数2, 整数型

.DLL命令 CopyMemory_NMLVCUSTOMDRAW, , "kernel32", "RtlMoveMemory"
    .参数 pDest, NMLVCUSTOMDRAW
    .参数 pSrc, 整数型
    .参数 ByteLen, 整数型

.DLL命令 Size_NMLVCUSTOMDRAW, 整数型, "kernel32", "GlobalSize", , 返回全局内存块大小
    .参数 hMem, NMLVCUSTOMDRAW

.DLL命令 CopyMemory_LV_ITEM, , "kernel32", "RtlMoveMemory"
    .参数 pDest, LV_ITEM
    .参数 pSrc, 整数型
    .参数 ByteLen, 整数型

.DLL命令 Size_LV_ITEM, 整数型, "kernel32", "GlobalSize", , 返回全局内存块大小
    .参数 hMem, LV_ITEM

.DLL命令 API_SendMessageA, 整数型, "user32", "SendMessageA", 公开
    .参数 hwnd, 整数型
    .参数 消息号, 整数型, , 消息的标识符
    .参数 参数一, 整数型, , 具体取决于消息
    .参数 参数二, 整数型, , 具体取决于消息

.DLL命令 API_GetSubItemRect, 整数型, , "SendMessageA"
    .参数 hwnd, 整数型
    .参数 msg, 整数型
    .参数 wparam, 整数型
    .参数 lparam, RECT

.DLL命令 lstrcpyn_文本, 整数型, "kernel32", "lstrcpynA", , 取内存变量地址
    .参数 lpString1, 文本型, 传址, 传址
    .参数 lpString2, 文本型, 传址
    .参数 iMaxLength, 整数型

.DLL命令 lstrcpyn_xx, 整数型, "kernel32", "lstrcpynA", , 取内存变量地址
    .参数 XXXX, LV_ITEM, 传址, 传址
    .参数 lpString2, LV_ITEM, 传址
    .参数 iMaxLength, 整数型