易语言窗口吸附模块源码
系统结构:设置临界值,加入窗口,删除窗口,取窗口数量,取指定窗口句柄,开始吸附,重新读取吸附线,重新读取吸附线_屏幕边缘,消息处理子程序,窗口事件处理,主窗口左键放开事件_,主窗口左键按下事件_,移动窗口,算出吸附窗口号,取窗口位置_特定值,算出需要整体拖动的窗口号,递归_深度计算吸附,设置窗口活动性,重新钩上,停止吸附,取窗口位置,FindWindow,SetWindowLong,CallWindowProc,复制内存_矩形到指针,复制内存_指针到矩形,移动窗口_,俘获鼠标,释放鼠标,
======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======程序集2
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 设置临界值
| |
| |------ 加入窗口
| |
| |------ 删除窗口
| |
| |------ 取窗口数量
| |
| |------ 取指定窗口句柄
| |
| |------ 开始吸附
| |
| |------ 重新读取吸附线
| |
| |------ 重新读取吸附线_屏幕边缘
| |
| |------ 消息处理子程序
| |
| |------ 窗口事件处理
| |
| |------ 主窗口左键放开事件_
| |
| |------ 主窗口左键按下事件_
| |
| |------ 移动窗口
| |
| |------ 算出吸附窗口号
| |
| |------ 取窗口位置_特定值
| |
| |------ 算出需要整体拖动的窗口号
| |
| |------ 递归_深度计算吸附
| |
| |------ 设置窗口活动性
| |
| |------ 重新钩上
| |
| |------ 停止吸附
| |
| |
======调用的Dll
| |
| |---[dll]------ 取窗口位置
| |
| |---[dll]------ FindWindow
| |
| |---[dll]------ SetWindowLong
| |
| |---[dll]------ CallWindowProc
| |
| |---[dll]------ 复制内存_矩形到指针
| |
| |---[dll]------ 复制内存_指针到矩形
| |
| |---[dll]------ 移动窗口_
| |
| |---[dll]------ 俘获鼠标
| |
| |---[dll]------ 释放鼠标
======窗口程序集1
| |
| |------ __启动窗口_创建完毕
| |
| |------ __启动窗口_获得焦点
| |
| |------ __启动窗口_可否被关闭
| |
| |
======窗口程序集2
| |
| |------ _窗口1_获得焦点
| |
| |------ _窗口1_可否被关闭
| |
| |
======窗口程序集3
| |
| |------ _窗口2_获得焦点
| |
| |------ _窗口2_可否被关闭
调用的DLL命令:
.DLL命令 取窗口位置, , "user32.dll", "GetWindowRect"
.参数 窗口句柄, 整数型
.参数 区域, 矩形_, 传址, 接受数据
.DLL命令 FindWindow, 整数型, "user32.dll", "FindWindowA"
.参数 类名, 文本型
.参数 标题, 文本型
.DLL命令 SetWindowLong, 整数型, "User32.dll", "SetWindowLongA"
.参数 hwnd, 整数型
.参数 nIndex, 整数型
.参数 dwNewLong, 整数型
.DLL命令 CallWindowProc, 整数型, "User32.dll", "CallWindowProcA"
.参数 lpPrevWndFunc, 整数型
.参数 hwnd, 整数型
.参数 msg, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型
.DLL命令 复制内存_矩形到指针, , , "RtlMoveMemory"
.参数 目标地址, 整数型
.参数 源地址, 矩形_
.参数 长度, 整数型
.DLL命令 复制内存_指针到矩形, , , "RtlMoveMemory"
.参数 目标地址, 矩形_
.参数 源地址, 整数型
.参数 长度, 整数型
.DLL命令 移动窗口_, 整数型, "user32.dll", "MoveWindow"
.参数 窗口句柄, 整数型, , hwnd,欲移动窗口的句柄
.参数 左侧位置, 整数型, , x,窗口新的左侧位置
.参数 顶部位置, 整数型, , y,窗口新的顶部位置
.参数 新宽度, 整数型, , nWidth,窗口的新宽度
.参数 高宽度, 整数型, , nHeight,窗口的高宽度
.参数 是否重画, 整数型, , bRepaint,如窗口此时应重画,则设为TRUE(非零)
.DLL命令 俘获鼠标, , , "SetCapture"
.参数 窗口句柄, 整数型
.DLL命令 释放鼠标, , , "ReleaseCapture"
易语言卷帘工具箱源码,初始化卷帘,取星期,更换风格,搜索文件,线程搜索,修改底色,获取信息,取信息记录,取网络信息...
易语言仅用核心支持库实现对外部数据库的操作ADODB操作外部数据库例程源码,根据村组查询数据,数据库_读取数据到高级表格,数据库_保存高级表格数据到数据库,数据库_读取数据到列表...
易语言仅用核心支持库实现对外部数据库的操作ADODB操作外部数据库例程源码,根据村组查询数据,数据库_读取数据到高级表格,数据库_保存高级表格数据到数据库,数据库_读取数据到列表...
易语言仅用核心支持库实现对外部数据库的操作ADODB操作外部数据库例程源码,根据村组查询数据,数据库_读取数据到高级表格,数据库_保存高级表格数据到数据库,数据库_读取数据到列表...
易语言两个文件内存中通讯源码,子程序1,打开文件,生成空文件,生成重复字节文件,移到文件首,移到文件尾,移动读写位置,取读写位置,关闭文件,取文件长度,写出字节集,是否在文件尾,取错...
易语言易模块管理器Include目录源码,CopyTo_CreateProcessDebugInfo,CopyTo_CreateThreadDebugInfo,CopyTo_ExitThreadDebugInfo,CopyTo_ExitProcessDebugInfo,CopyTo_LoadDllDebugInfo,CopyTo_UnloadDllDebugInfo,CopyTo_ExceptionDebugInfo,Copy...
易语言卷帘工具箱源码,初始化卷帘,取星期,更换风格,搜索文件,线程搜索,修改底色,获取信息,取信息记录,取网络信息...
子程序1,打开文件,生成空文件,生成重复字节文件,移到文件首,移到文件尾,移动读写位置,取读写位置,关闭文件,取文件长度,写出字节集,是否在文件尾,取错误信息,读入字节集,读入2M字节集,清除文件缓冲区,读入文本,写出文本,写文本行,读入一行,插入字节集,取文件号...
初始化卷帘,取星期,更换风格,搜索文件,线程搜索,修改底色,获取信息,取信息记录,取网络信息...