易语言API滚动条操作源码

系统结构:消息钩子,置横向滚动条,置纵向滚动条,显示滚动条_,呼叫窗口函数地址_,设置滚动条参数_,设置窗口信息_,GetScrollInfo,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 消息钩子
           |  |
           |  |------ 置横向滚动条
           |  |
           |  |------ 置纵向滚动条
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   显示滚动条_
           |  |
           |  |---[dll]------   呼叫窗口函数地址_
           |  |
           |  |---[dll]------   设置滚动条参数_
           |  |
           |  |---[dll]------   设置窗口信息_
           |  |
           |  |---[dll]------   GetScrollInfo

调用的DLL命令:

.DLL命令 显示滚动条_, 整数型, "user32.dll", "ShowScrollBar", , , ShowScrollBar
    .参数 窗口句柄, 整数型, , hwnd
    .参数 滚动条标志, 整数型, , wBar
    .参数 显示标志, 整数型, , bShow

.DLL命令 呼叫窗口函数地址_, 整数型, "user32.dll", "CallWindowProcA"
    .参数 前一窗口函数地址, 整数型
    .参数 窗口句柄, 整数型
    .参数 消息值, 整数型
    .参数 附加参数1, 整数型
    .参数 附加参数2, 整数型

.DLL命令 设置滚动条参数_, 整数型, "user32.dll", "SetScrollInfo", , ,
    .参数 窗口句柄, 整数型, , 滚动条控件或带标准滚动条的窗体句柄，由fnBar参数决定。
    .参数 类型, 整数型
    .参数 滚动条, 滚动条类型
    .参数 重画, 逻辑型

.DLL命令 设置窗口信息_, 整数型, "user32", "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 窗口句柄, 整数型, , hwnd，欲为其取得信息的窗口的句柄
    .参数 窗口信息值, 整数型, , nIndex，请参考GetWindowLong函数的nIndex参数的说明
    .参数 窗口信息新值, 整数型, , dwNewLong，由nIndex指定的窗口信息的新值

.DLL命令 GetScrollInfo, 整数型, "user32", "GetScrollInfo"
    .参数 hwnd, 整数型
    .参数 n, 整数型
    .参数 lpcScrollInfo, 滚动条类型