精易论坛

标题: 子控件自动按比例调节尺寸 [打印本页]

作者: 神女软件定制    时间: 2022-6-10 14:52
标题: 子控件自动按比例调节尺寸
本帖最后由 神女软件定制 于 2022-6-10 15:09 编辑



看到这个帖子:https://125.confly.eu.org/thread-14733447-1-1.html

跟着写了个
  
子程序名返回值类型公开备 注
比例调节  
参数名类 型参考可空数组备 注
cs_父窗口句柄整数型
变量名类 型静态数组备 注
rcRECT 
hwnd整数型 
data整数型 
比例字节型4
left整数型 
top整数型 
sn_GetClientRect (cs_父窗口句柄, rc)
hwnd = sn_GetWindow (cs_父窗口句柄, 5)  ' 5=#GW_CHILD
判断循环首 (hwnd ≠ 0)
data = sn_GetWindowLong (hwnd, -21)  ' -21=#GWL_USERDATA
比例 [1]右移 (data, 24)
比例 [2]右移 (data, 16)
比例 [3]右移 (data, 8)
比例 [4] = data
left = rc.Right × 比例 [1] ÷ 255
top = rc.Bottom × 比例 [2] ÷ 255
sn_MoveWindow (hwnd, left, top, rc.Right × 比例 [3] ÷ 255 - left, rc.Bottom × 比例 [4] ÷ 255 - top, 1)
比例调节 (hwnd)
hwnd = sn_GetWindow (hwnd, 2)  ' 2=#GW_HWNDNEXT
判断循环尾 ()
子程序名返回值类型公开备 注
记录控件比例  
参数名类 型参考可空数组备 注
cs_父窗口句柄整数型
变量名类 型静态数组备 注
rcRECT 
hwnd整数型 
rcChildRECT 
比例字节型4
t字节型 
r字节型 
b字节型 
sn_GetClientRect (cs_父窗口句柄, rc)
hwnd = sn_GetWindow (cs_父窗口句柄, 5)  ' 5=#GW_CHILD
判断循环首 (hwnd ≠ 0)
sn_GetWindowRect (hwnd, rcChild)
sn_ScreenToClient_X (cs_父窗口句柄, 取变量地址 (rcChild.Left))
sn_ScreenToClient_X (cs_父窗口句柄, 取变量地址 (rcChild.Right))
比例 [1] = rcChild.Left × 255 \ rc.Right
比例 [2] = rcChild.Top × 255 \ rc.Bottom
比例 [3] = rcChild.Right × 255 \ rc.Right
比例 [4] = rcChild.Bottom × 255 \ rc.Bottom
sn_SetWindowLong (hwnd, -21, 位或 (左移 (比例 [1], 24), 左移 (比例 [2], 16), 左移 (比例 [3], 8), 比例 [4]))  ' -21=#GWL_USERDATA
记录控件比例 (hwnd)
hwnd = sn_GetWindow (hwnd, 2)  ' 2=#GW_HWNDNEXT
判断循环尾 ()


i支持库列表   支持库注释   
spec特殊功能支持库


只有这两个函数,
_启动窗口创建完毕的时候,调用“记录控件比例”,会把指定窗口的所有子窗口包括子子窗口的,坐标比例,记录下来,没有用到变量,信息记录到对应窗口的附加数据了。
0-255。左顶右底,4个255

窗口尺寸改变的时候,调用“比例调节”。

另外推荐下这个:
完美的窗口布局模块,动态布局控件
https://125.confly.eu.org/forum.php?mod=viewthread&tid=14707438
(出处: 精易论坛)


这个可以精细的指定每个控件的排版规则,当然不是懒人专用了,麻烦一点。


控件比例调节.e (11.81 KB, 下载次数: 222)
作者: 冰棍好烫啊    时间: 2022-6-10 15:21
支持开源~!感谢分享
作者: pjm123    时间: 2022-6-10 15:47
谢谢分享
作者: Shanks    时间: 2022-6-10 19:52
支持一下!你的去重复比较好用···源码会共享吗
作者: reveriexue    时间: 2022-6-10 19:53

作者: sunsun321    时间: 2022-6-11 10:26
楼下升级版
作者: gaoqing    时间: 2022-6-11 10:33
谢谢楼主
作者: 大小鱼    时间: 2022-6-11 13:22
支持开源~!感谢分享
作者: 王摇摆    时间: 2022-6-11 13:37
感谢分享
作者: 吃干饭的锅    时间: 2022-6-11 13:39
        支持开源~!感谢分享
作者: QQ1329127360    时间: 2022-6-11 13:49
开源精神必须支持~
作者: chouchong06    时间: 2022-6-11 22:00

开源精神必须支持~
作者: 尧兴    时间: 2022-6-13 18:31
6666666666666666666666666666666
作者: 杨明煜    时间: 2022-6-13 18:49
真值得学习,感谢!......
作者: pojiezhe    时间: 2022-7-4 01:13
开源精神必须支持~
作者: hai20041004    时间: 2022-8-10 19:57
这个好像不错…………
作者: liuyanjun75    时间: 2023-3-7 19:42
支持开源~!感谢分享
作者: weihua2018    时间: 2023-3-9 23:12
看看再说吧
作者: 换行符    时间: 2023-3-12 02:43
支持开源~!感谢分享
作者: dulang    时间: 2023-3-14 20:30
用心讨论,共获提升!
作者: sn123zyc    时间: 2023-5-27 10:39
感谢分享,很给力!~
作者: xmz_2005    时间: 2023-7-28 18:44
谢谢分享
作者: xmz_2005    时间: 2023-7-28 18:44
谢谢分享
作者: 罗文    时间: 2023-7-29 20:01

作者: gdhong    时间: 2023-8-9 07:30
谢谢分享
作者: pyhehe    时间: 2023-10-20 09:42

作者: 卡卡1111    时间: 2024-7-14 19:15
支持开源~!感谢分享
作者: dingdadas    时间: 2025-3-10 23:02
支持开源~!感谢分享2342354654645645645




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4