• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[老狼] [老狼][源码分享]----窗口平铺----匆匆十年(51) [复制链接]

1#
实现效果:

  • 窗口平铺
窗口按指定行、列平铺:


源码思路一览:
行数 = 2'设置每行多少个窗口
列数 = 2'设置每列多少个窗口
初始y=0'窗口左上角Y坐标初始值
分辨率x=Plugin.GetSysInfo.GetScreenResolutionX() '获取屏幕分辨率宽度
分辨率y = Plugin.GetSysInfo.GetScreenResolutionY()'获取屏幕分辨率高度
TracePrint 分辨率x&","&分辨率y
窗口宽度 = 分辨率x / 行数'算出需要排列的窗口应该设置多宽
窗口高度=分辨率y / 列数 '算出需要排列的窗口应该设置多高
TracePrint 窗口宽度 & "," & 窗口高度
HwndEx = Plugin.Window.SearchEx(0,"记事本",0)'遍历所有符合的句柄
MyArray = Split(HwndEx, "|")'分割句柄为数组
For UBound(MyArray) '循环句柄
初始x = 0'窗口左上角X坐标初始值,因为每次换行就需要归零 所有写大循环内
TracePrint "========="
For 列数'设置小循环用于排列每行的列窗口
TracePrint MyArray(i)
If MyArray(i) = "" Then '如果句柄=空
ExitScript'就停止脚本
End If
Call Plugin.Window.Size(MyArray(i), 窗口宽度, 窗口高度)'修改指定句柄窗口的宽、高
Call Plugin.Window.Move(MyArray(i), 初始x, 初始y)'移动指定句柄的窗口位置
初始x = 初始x + 窗口宽度'窗口左上角X坐标加一个窗口宽度的偏移量
i=i+1'通过i递增1 下次就会使用下一个句柄
Next
初始y=初始y+窗口高度'窗口左上角Y坐标加一个窗口高度的偏移量
Next

最后编辑瑞祥幽冥狼 最后编辑于 2022-05-08 14:56:24
本主题由 超级版主 瑞祥幽冥狼 于 2023/7/23 18:51:57 执行 审核帖子 操作
收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
2#

++666666谢谢

3#

支持一个~ 强无敌!

4#

窗口平铺

5#

兄弟 辛苦了 拿走了 谢谢

6#

-窗口平铺----匆匆十年

7#

学习一下。。。。。。。。。。。。。。。。。。

8#

窗口平铺----匆匆十年

9#


10#

666666666

11#

学习的吧啊啊啊

12#

学学是 反对士大夫发生的

13#

qweeee

14#

学习学习

15#

学习

16#

我要看看

17#

你小子搞什么飞机

18#

11111111111111111111111111

19#

1111111111111

20#

阿斯达四大撒所

发新话题 回复该主题