易语言超级窗口吸附特效模块源码

系统结构:窗口_窗口吸附,设置窗口位置_,取窗口矩形,API_取窗口大小,DLL命令1,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 窗口_窗口吸附
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   设置窗口位置_
           |  |
           |  |---[dll]------   取窗口矩形
           |  |
           |  |---[dll]------   API_取窗口大小
           |  |
           |  |---[dll]------   _取前台窗体句柄
           |  |
           |  |---[dll]------   DLL命令1

调用的DLL命令:

.DLL命令 设置窗口位置_, 整数型, "user32", "SetWindowPos", , 这个函数能为窗口指定一个新位置和状态。它也可改变窗口在内部窗口列表中的位置。该函数与DeferWindowPos函数相似，只是它的作用是立即表现出来的（在vb里使用：针对vb窗体，如它们在win32下屏蔽或最小化，则需重设最顶部状态。如有必要，请用一个子类处理模块来重设最顶部状态  非零表示成功，零表示失败。会设置GetLastError
    .参数 窗口句柄, 整数型, , 欲定位的窗口
    .参数 窗口标识, 整数型, , 窗口新的x坐标。如hwnd是一个子窗口，则x用父窗口的客户区坐标表示
    .参数 X坐标, 整数型, , 窗口新的y坐标。如hwnd是一个子窗口，则y用父窗口的客户区坐标表示
    .参数 Y坐标, 整数型, , 指定新的窗口宽度
    .参数 cy, 整数型, , 指定新的窗口高度
    .参数 wFlags, 整数型, , 包含了旗标的一个整数
    .参数 hWndInsertAfter, 整数型, , 窗口句柄。在窗口列表中，窗口hwnd会置于这个窗口句柄的后面。也可能选用下述值之一：

.DLL命令 取窗口矩形, 整数型, "user32", "GetWindowRect", , 获得整个窗口的范围矩形，窗口的边框、标题栏、滚动条及菜单等都在这个矩形内  非零表示成功，零表示失败。会设置GetLastError
    .参数 窗口句柄, 整数型, , 想获得范围矩形的那个窗口的句柄
    .参数 矩形区域, 矩形类型, , RECT，屏幕坐标中随同窗口装载的矩形

.DLL命令 API_取窗口大小, 整数型, "user32", "GetClientRect", , 返回指定窗口客户区矩形的大小 (Long，非零表示成功，零表示失败。)
    .参数 hwnd, 整数型, , Long，欲计算大小的目标窗口
    .参数 lpRect, 矩形类型, , RECT，指定一个矩形，用客户区域的大小载入（以像素为单位）

.DLL命令 _取前台窗体句柄, 整数型, "user32", "GetForegroundWindow", , “(已经检查)”

.DLL命令 DLL命令1