按键精灵---边框与客户区

最新推荐文章于 2023-11-06 22:12:55 发布

彭信惠

最新推荐文章于 2023-11-06 22:12:55 发布

阅读量275

点赞数

本文链接：https://blog.csdn.net/weixin_49567506/article/details/109428228

版权

边框与客户区讲解

Hwnd = Plugin.window.Find("Notepad", 0)
TracePrint "得到的窗口句柄" & Hwnd
If Hwnd = 0 Then //最好加个if，要不然脚本写好才发现没找到句柄，多麻烦自己想。
	MessageBox "没有找到句柄"
	ExitScript
End If
CR = Plugin.window.GetWindowRect(Hwnd)
TracePrint CR
边框数组 = Split(CR, "|")
TracePrint"边框左上角和右下角的坐标分别为"&边框数组(0)&","&边框数组(1)&","&边框数组(2)&","&边框数组(3)
SR = Plugin.window.GetClientRect(Hwnd)
TracePrint SR
客户区数组 = Split(SR, "|")
TracePrint"客户区左上角坐标为："&客户区数组(0)&","&客户区数组(1)&"；客户区窗口宽度："&客户区数组(2)&",客户区高度："&客户区数组(3)&"；右下角坐标为"&(clng(客户区数组(0))+clng(客户区数组(2)))&","&(clng(客户区数组(1))+clng(客户区数组(3)))