高级表格单元格自动添加按钮

系统结构:处理,CallWindowProcA,SetWindowLongA,SetParent,取当前进程,GetWindowRect,GetClientRect,SendMessageA,ScreenToClient,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 处理
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CallWindowProcA
           |  |
           |  |---[dll]------   SetWindowLongA
           |  |
           |  |---[dll]------   SetParent
           |  |
           |  |---[dll]------   取当前进程
           |  |
           |  |---[dll]------   GetWindowRect
           |  |
           |  |---[dll]------   GetClientRect
           |  |
           |  |---[dll]------   SendMessageA
           |  |
           |  |---[dll]------   ScreenToClient

调用的DLL命令:

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

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

.DLL命令 SetParent, 整数型, , "SetParent"
    .参数 hwnd1
    .参数 hwnd2

.DLL命令 取当前进程, 整数型, , "GetCurrentProcess"

.DLL命令 GetWindowRect, , , "GetWindowRect"
    .参数 句柄
    .参数 矩形, RECT

.DLL命令 GetClientRect, , , "GetClientRect"
    .参数 句柄
    .参数 矩形, RECT

.DLL命令 SendMessageA, 整数型, , "SendMessageA"
    .参数 hwnd
    .参数 msg
    .参数 wp
    .参数 lp

.DLL命令 ScreenToClient, 整数型, "user32", "ScreenToClient"
    .参数 hwnd, 整数型
    .参数 lpPoint, xy, , 可能为 POINTAPI 结构。