易语言同步缩放窗口类 易语言同步缩放控件模块源码

易语言同步缩放控件模块源码

系统结构:到客户区坐标_,初始化,置同步缩放控件,同步缩放控件,置分隔条调整控件,置自动调整分隔条,分隔条调整控件,重置同步缩放控件,取窗口位置,取窗口大小,取父窗口句柄,置窗口新位置,到客户区坐标_,

======窗口程序集1
| |
| |------ __启动窗口_创建完毕
| |
| |------ __启动窗口_尺寸被改变
| |
| |------ _分隔条1_鼠标左键被按下
| |
| |------ _分隔条1_被拖动
| |
| |------ _分隔条2_被拖动
| |
| |------ _分隔条2_鼠标左键被按下
| |
| |
======调用的Dll
| |
| |---[dll]------ 到客户区坐标_
======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======类_同步缩放控件
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 初始化
| |
| |------ 置同步缩放控件
| |
| |------ 同步缩放控件
| |
| |------ 置分隔条调整控件
| |
| |------ 置自动调整分隔条
| |
| |------ 分隔条调整控件
| |
| |------ 重置同步缩放控件
| |
| |
======调用的Dll
| |
| |---[dll]------ 取窗口位置
| |
| |---[dll]------ 取窗口大小
| |
| |---[dll]------ 取父窗口句柄
| |
| |---[dll]------ 置窗口新位置
| |
| |---[dll]------ 到客户区坐标_

调用的DLL命令:

.DLL命令 到客户区坐标_, 整数型, "user32.dll", "ScreenToClient", , , ScreenToClient，Long，非零表示成功，零表示失败
.参数 窗口句柄, 整数型, , hwnd，Long，一个窗口的句柄，该窗口定义了要使用的客户区坐标系统
.参数 点, 坐标_, , POINTAPI，屏幕坐标系统中包含了屏幕点的结构。这个函数会随同相应的客户区坐标（由hwnd决定）载入结构

调用的DLL命令:

.DLL命令 取窗口位置, 逻辑型, , "GetWindowRect"
.参数 窗口句柄
.参数 窗口位置, 矩形, 传址, 矩形.1 为左上角X 坐标<> 矩形.2 为左上角Y 坐标<> 矩形.3 为右下角X 坐标<> 矩形.4 为右下角Y 坐标

.DLL命令 取窗口大小, 逻辑型, , "GetClientRect"
.参数 窗口句柄
.参数 窗口位置, 矩形, 传址, 矩形.3 为宽 矩形.4 为高

.DLL命令 取父窗口句柄, 整数型, , "GetParent", , 返回子窗口的父窗口句柄
.参数 子窗口句柄, 整数型

.DLL命令 置窗口新位置, 逻辑型, , "SetWindowPos", , 设置窗口新位置 (窗口句柄, 1, 300, 0, 500, 500, 0)
.参数 窗口句柄, 整数型
.参数 Z序, 整数型, , 1
.参数 左上角X轴坐标, 整数型
.参数 左上角Y轴坐标, 整数型
.参数 窗口宽度, 整数型
.参数 窗口高度, 整数型
.参数 参数, 整数型, , 0:3-6这4个系数都起作用, 1:3-4两个参数起作用 2:宽度和高度参数起作用

.DLL命令 到客户区坐标_, 整数型, "user32.dll", "ScreenToClient", , , ScreenToClient，Long，非零表示成功，零表示失败
.参数 窗口句柄, 整数型, , hwnd，Long，一个窗口的句柄，该窗口定义了要使用的客户区坐标系统
.参数 点, 坐标_, , POINTAPI，屏幕坐标系统中包含了屏幕点的结构。这个函数会随同相应的客户区坐标（由hwnd决定）载入结构