易语言属性框高级表格版源码

系统结构:高级表格消息处理,屏幕到客户_矩形,调用窗口回调_,置窗口信息_,屏幕到客户区_,置父窗口_,客户区到屏幕_,取窗口矩形_,屏幕到客户区_矩形_,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 高级表格消息处理
           |  |
           |  |------ 屏幕到客户_矩形
           |  |
           |  |------ _高级表格1_光标位置改变
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _颜色选择器1_颜色被改变
           |  |
           |  |------ _高级表格1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   调用窗口回调_
           |  |
           |  |---[dll]------   置窗口信息_
           |  |
           |  |---[dll]------   屏幕到客户区_
           |  |
           |  |---[dll]------   置父窗口_
           |  |
           |  |---[dll]------   客户区到屏幕_
           |  |
           |  |---[dll]------   取窗口矩形_
           |  |
           |  |---[dll]------   屏幕到客户区_矩形_

调用的DLL命令:

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

.DLL命令 置窗口信息_, 整数型, , "SetWindowLongA"
    .参数 窗口句柄, 整数型
    .参数 要置的特征, 整数型
    .参数 新特征, 整数型

.DLL命令 屏幕到客户区_, 逻辑型, "user32.dll", "ScreenToClient"
    .参数 hwnd, 整数型, , 此窗口的用户空间将被用来转换
    .参数 point, 点_, 传址, 屏幕坐标

.DLL命令 置父窗口_, 整数型, , "SetParent"
    .参数 子窗口句柄, 整数型
    .参数 新父窗口句柄, 整数型

.DLL命令 客户区到屏幕_, 整数型, , "ClientToScreen"
    .参数 hwnd, 整数型
    .参数 lpPoint, 点_

.DLL命令 取窗口矩形_, , , "GetWindowRect"
    .参数 句柄, 整数型
    .参数 矩形, 矩形_

.DLL命令 屏幕到客户区_矩形_, 逻辑型, "user32.dll", "ScreenToClient"
    .参数 hwnd, 整数型, , 此窗口的用户空间将被用来转换
    .参数 rect, 矩形_, 传址, 屏幕矩形