易语言取单元格坐标源码

系统结构:子程序1_垂直滚动,子程序1_平行滚动,GetWindowRect,GetClientRect,ScreenToClient,SetWindowLongA,CallWindowProcA,SendMessageA,BeginPaint,EndPaint,DeleteDC,GetScrollInfo,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======窗口2
           |  |
           |  |------ _窗口2_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 子程序1_垂直滚动
           |  |
           |  |------ 子程序1_平行滚动
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetWindowRect
           |  |
           |  |---[dll]------   GetClientRect
           |  |
           |  |---[dll]------   ScreenToClient
           |  |
           |  |---[dll]------   SetWindowLongA
           |  |
           |  |---[dll]------   CallWindowProcA
           |  |
           |  |---[dll]------   SendMessageA
           |  |
           |  |---[dll]------   BeginPaint
           |  |
           |  |---[dll]------   EndPaint
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   GetScrollInfo

调用的DLL命令:

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

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

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

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

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

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

.DLL命令 BeginPaint, 整数型, "gdi32.dll", "BeginPaint"
    .参数 hwnd, 整数型
    .参数 lpPaint, 整数型

.DLL命令 EndPaint, , "gdi32.dll", "EndPaint"
    .参数 hwnd, 整数型
    .参数 lpPaint, 整数型

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

.DLL命令 GetScrollInfo, 整数型, , "GetScrollInfo", , 非零表示成功，零表示失败。
    .参数 hwnd, 整数型, , 欲设置滚动条的句柄或是含滚动条窗口的句柄
    .参数 nBar, 整数型, , SB_CTL 标识滚动条控制器 SB_HORZ 水平滚动条 SB_VERT 垂直滚动条
    .参数 lpsi, SCROLLINFO