实现效果:窗口按指定行、列平铺:源码思路一览:行数 = 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