易语言子类化鼠标进入离开源码

系统结构:消息处理函数,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 消息处理函数
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   _设置窗口信息
           |  |
           |  |---[dll]------   _呼叫窗口函数地址
           |  |
           |  |---[dll]------   _监视鼠标

调用的DLL命令:

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

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

.DLL命令 _监视鼠标, 整数型, "comctl32.dll", "_TrackMouseEvent"
    .参数 监视数据, 监视结构