查看: 2383|回复: 14	[老狼] [老狼][源码分享]----按顺序获取窗口句柄----被城管追赶的第六天... [复制链接]

发送短消息 UID 1228894 帖子 26809 精华 25 鲜花 7919 朵 铜币 35962 个 银币 4579 个 性别 在线时间 421340 注册时间 2012-07-18 最后登录 2023-09-26 1223116618 查看公共资料 搜索主题 搜索帖子 瑞祥幽冥狼 按 键 工 程 师 ● 兼 职 组别超级版主 UID1228894 帖子26809 精华25 鲜花7919 朵 铜币35962 个 银币4579 个 在线时间421340 注册时间2012-07-18 按键X开拓者勋章 按键精灵X版开拓者勋章 过大年勋章 俩小福娃给大家拜年啦！ 双十一绝版纪念勋章 双十一绝版纪念勋章 抗战胜利70周年勋章 抗战胜利70周年活动的专属勋章 单身汪勋章 单身贵族的专属勋章 按键14周年庆纪念勋章 按键14周年庆纪念勋章 按键学院 按键学院专属勋章，按键学院学员或文章被院刊收入可领取 幸运草勋章 商业小精灵限时活动勋章。 马年勋章 马年纪念勋章 鹰眼勋章 鹰眼注册用户专属勋章 黄瓜勋章 体验商业小精灵活动的奖励 天使勋章 天使一样的用户 按键明星 按键明星勋章 黄金之翼 黄金之翼勋章 举报达人 长期举报不良帖子 活动狂人 论坛活动狂人 骨灰级按键用户 3年以上的按键论坛用户 按键精灵开发者6级 可通过提升认证等级来升级勋章：rz.anjian.com 龙年勋章 龙年纪念勋章 十周年勋章 十周年纪念勋章 兔年勋章 兔年纪念勋章 论坛GG 按键论坛男性用户勋章 发帖高手 鼓励积极回复，但注意不要灌水哦 爱心大使 积极帮助新手（可向管理员进行申请） 学有所成 学有所成勋章，新手步入按键学堂的第一枚勋章 按键运营团队 按键运营团队专属勋章 按键元老 资深按键用户的尊贵荣誉勋章 管理人员 按键论坛的管理团队专属勋章	1# 字体大小: t T 发表于 2022-02-24 23:49 | |只看楼主 帖子说明:今天有人问了如何按下面图片示意1-9顺序获取句柄，然后我进入了深思 自带Window插件中Search、SearchEx；大漠EnumWindow命令获取的句柄均为乱序 1-9窗口是提问人随意摆的，并程序非打开的对应顺序，也无法通过程序打开的次序及对应PID获取句柄 1.png(277.94 K) 2022/2/28 0:33:45 思路1： 获取窗口左上角图标的所有坐标，这样会返回9个坐标，在通过361窗口插件或大漠插件获取指定坐标的句柄 33.png(96.67 K) 2022/2/28 0:33:45 结论：可这样一个问题，图片被挡住了怎么办，我进入了牛角尖，然后我想了思路2 思路2： 获取所有句柄，然后得到窗口左上角坐标，然后双for进行排序 HwndEx = Plugin.Window.SearchEx(0,"记事本",0) MyArray = Split(HwndEx, "|") For i=0 to UBound(MyArray)-1 sRect = Plugin.Window.GetClientRect(MyArray(i)) 左上 = Split(sRect, "|") 左= Clng(左上(0)): 上 = Clng(左上(1)) TracePrint "第 " & i + 1 & " 个窗口句柄为：" & MyArray(i) & "x坐标" & 左 & ",y坐标" & 上 重组信息=重组信息& MyArray(i)&"-"&左&","&上&"|" Next 重组信息= "|"&重组信息 TracePrint 重组信息 Sub tx() TracePrint now() TracePrint "1" For x = 1 To 1920 For y = 1 To 1080 If instr(重组信息,"-"& x & "," & y) > 0 Then TracePrint x&","&y TracePrint Split(split(重组信息,"-"&x&","&y)(0),"|")(1) End If Next Next TracePrint now() End Sub Call tx() 复制代码 结论：速度很慢，没卵用，所以有了思路3 思路3：通过计算谁离左上、中上、右上最近得出1-3，通过计算谁离左中，中中，右中得出4-6. ... 调试结果： 4.png(178.62 K) 2022/2/28 0:33:45 源码一览： ***** 该内容需您回复才可浏览 ***** 若有新思路 请跟帖 一起交流 作者QQ:414098315 t1 = Plugin.Sys.GetTime() HwndEx = Plugin.Window.SearchEx(0,"记事本",0) MyArray = Split(HwndEx, "|") For i=0 to UBound(MyArray)-1 sRect = Plugin.Window.GetClientRect(MyArray(i)) 左上 = Split(sRect, "|") 左 = Clng(左上(0)) : 上 = Clng(左上(1)) :下 = Clng(左上(3)) 斜边 = (左 ^ 2 + 上 ^ 2) ^ 0.5 高度 = 下 - 上 // TracePrint "第 " & i + 1 & " 个窗口句柄为：" & MyArray(i) & "x坐标" & 左 & ",y坐标" & 上 If i = UBound(MyArray) - 1 Then 句柄信息 = 句柄信息 & MyArray(i) 斜边信息 = 斜边信息 & 斜边 Y信息 = Y信息 & 上 窗口高度 = 窗口高度 & 高度 Else 句柄信息 = 句柄信息 & MyArray(i) & "|" 斜边信息 = 斜边信息 & 斜边 & "|" Y信息 = Y信息 & 上 & "|" 窗口高度 = 窗口高度 & 高度 & "|" End If Next TracePrint 句柄排序(斜边信息, Y信息, 句柄信息,窗口高度) TracePrint CStr(Plugin.Sys.GetTime() - t1) +"毫秒" Function 句柄排序(data, str, hwnd,height) Dim 句柄重组 data = Split(data, "|") yData = Split(str, "|") hwndData = Split(hwnd, "|") heightData = Split(height, "|") For i = 0 To UBound(data)-1 For j = i + 1 To UBound(data) If CInt(data(i)) > CInt(data(j)) Then temp = data(j) data(j) = data(i) data(i) = temp temphwnd = hwndData(j) hwndData(j) = hwndData(i) hwndData(i) = temphwnd tempy = yData(j) yData(j) = yData(i) yData(i) = tempy End If Next Next For i = 0 To UBound(yData)-1 For j = i + 1 To UBound(yData) If CInt(yData(i)) > CInt(yData(j)) and abs(CInt(yData(i)) - CInt(yData(j))) > CInt(heightData(i)) / 2 Then temphwnd = hwndData(j) hwndData(j) = hwndData(i) hwndData(i) = temphwnd End If Next Next For i = 0 To UBound(hwndData) If i = UBound(hwndData) Then 句柄重组 = 句柄重组 & hwndData(i) Else 句柄重组 = 句柄重组 & hwndData(i) & "|" End If Next 句柄排序 = 句柄重组 End Function 复制代码
	瑞祥幽冥狼 最后编辑于 2022-02-28 00:33:45 本主题由 超级版主 瑞祥幽冥狼 于 2022/3/25 21:35:05 执行 审核帖子 操作 点赞 收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击 个 人 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［可加］
	回顶部

发送短消息 UID 6027278 帖子 63 精华 0 鲜花 138 朵 铜币 121 个 银币 81 个 性别 在线时间 0 注册时间 2019-01-15 最后登录 2023-05-15 查看公共资料 搜索主题 搜索帖子 zchwnet1 zchwnet1 组别小学三年级 UID6027278 帖子63 精华0 鲜花138 朵 铜币121 个 银币81 个 在线时间0 注册时间2019-01-15	2# 字体大小: t T 发表于 2022-02-25 00:03 | |只看该用户 6666666666666666666666
	回顶部

发送短消息 UID 442265 帖子 119 精华 0 鲜花 69 朵 铜币 227 个 银币 110 个 性别 在线时间 20 注册时间 2010-06-15 最后登录 2023-09-22 181469347 查看公共资料 搜索主题 搜索帖子 wuhezong wuhezong 组别小学六年级 UID442265 帖子119 精华0 鲜花69 朵 铜币227 个 银币110 个 在线时间20 注册时间2010-06-15	3# 字体大小: t T 发表于 2022-02-25 01:30 | |只看该用户
	回顶部

发送短消息 UID 4985284 帖子 455 精华 0 鲜花 93 朵 铜币 462 个 银币 465 个 性别 在线时间 0 注册时间 2018-01-23 最后登录 2023-09-23 1431502976 查看公共资料 搜索主题 搜索帖子 许夜雨澜 许夜雨澜 组别初中三年级 UID4985284 帖子455 精华0 鲜花93 朵 铜币462 个 银币465 个 在线时间0 注册时间2018-01-23 按键精灵开发者3级 可通过提升认证等级来升级勋章：rz.anjian.com 教程达人 教程达人	4# 字体大小: t T 发表于 2022-02-25 09:14 | |只看该用户 我看看
	回顶部

发送短消息 UID 7575121 帖子 15 精华 0 鲜花 13 朵 铜币 25 个 银币 15 个 性别 在线时间 0 注册时间 2020-04-04 最后登录 2022-03-11 2122230474 查看公共资料 搜索主题 搜索帖子 weixiao132 微笑 组别小学一年级 UID7575121 帖子15 精华0 鲜花13 朵 铜币25 个 银币15 个 在线时间0 注册时间2020-04-04	5# 字体大小: t T 发表于 2022-02-25 11:35 | |只看该用户
	回顶部

发送短消息 UID 6958284 帖子 41 精华 0 鲜花 34 朵 铜币 51 个 银币 41 个 性别 在线时间 0 注册时间 2019-09-10 最后登录 2022-04-23 123613498 查看公共资料 搜索主题 搜索帖子 yyloverain yyloverain 组别小学二年级 UID6958284 帖子41 精华0 鲜花34 朵 铜币51 个 银币41 个 在线时间0 注册时间2019-09-10	6# 字体大小: t T 发表于 2022-02-25 15:56 | |只看该用户
	回顶部

发送短消息 UID 1962989 帖子 3776 精华 0 鲜花 1345 朵 铜币 10694 个 银币 1156 个 性别 在线时间 213980 注册时间 2013-06-30 最后登录 2023-09-26 2929338900 查看公共资料 搜索主题 搜索帖子 Danboy 洛洛米 组别官方脚本作者 UID1962989 帖子3776 精华0 鲜花1345 朵 铜币10694 个 银币1156 个 在线时间213980 注册时间2013-06-30 按键X开拓者勋章 按键精灵X版开拓者勋章 按键剑侠客 按键剑侠客勋章 图灵勋章 参与按键精灵验证码识别大赛奖励 按键图书勋章 尊贵的按键图书用户 天使勋章 天使一样的用户 按键明星 按键明星勋章 黄金之翼 黄金之翼勋章 骨灰级按键用户 3年以上的按键论坛用户 按键精灵开发者5级 可通过提升认证等级来升级勋章：rz.anjian.com 论坛GG 按键论坛男性用户勋章 学有所成 学有所成勋章，新手步入按键学堂的第一枚勋章	7# 字体大小: t T 发表于 2022-02-25 17:44 | |只看该用户 GetProcessTimes系统api了解下
	脚本定制,欢迎咨询QQ: 2692863915
	回顶部

发送短消息 UID 2565265 帖子 25 精华 0 鲜花 18 朵 铜币 34 个 银币 24 个 性别 在线时间 0 注册时间 2014-06-10 最后登录 2022-10-11 358099130 查看公共资料 搜索主题 搜索帖子 wqyjn14s wqyjn14s 组别小学一年级 UID2565265 帖子25 精华0 鲜花18 朵 铜币34 个 银币24 个 在线时间0 注册时间2014-06-10	8# 字体大小: t T 发表于 2022-03-01 15:06 | |只看该用户 谢谢Thanks♪(･ω･)ﾉ
	回顶部

发送短消息 UID 3867309 帖子 426 精华 0 鲜花 74 朵 铜币 1003 个 银币 246 个 性别 在线时间 4220 注册时间 2016-04-14 最后登录 2023-09-26 查看公共资料 搜索主题 搜索帖子 枫落ye无痕 枫落ye无痕 组别初中三年级 UID3867309 帖子426 精华0 鲜花74 朵 铜币1003 个 银币246 个 在线时间4220 注册时间2016-04-14	9# 字体大小: t T 发表于 2022-03-02 12:37 | |只看该用户 先回复再说
	回顶部

发送短消息 UID 8661401 帖子 27 精华 0 鲜花 25 朵 铜币 28 个 银币 28 个 性别 在线时间 0 注册时间 2022-03-17 最后登录 2023-03-27 查看公共资料 搜索主题 搜索帖子 beck999 组别小学一年级 UID8661401 帖子27 精华0 鲜花25 朵 铜币28 个 银币28 个 在线时间0 注册时间2022-03-17	10# 字体大小: t T 发表于 2022-03-24 19:28 | |只看该用户
	回顶部

发送短消息 UID 3958378 帖子 656 精华 0 鲜花 146 朵 铜币 3302 个 银币 132 个 性别 在线时间 7160 注册时间 2016-06-07 最后登录 2023-09-26 查看公共资料 搜索主题 搜索帖子 z3090712 组别高中三年级 UID3958378 帖子656 精华0 鲜花146 朵 铜币3302 个 银币132 个 在线时间7160 注册时间2016-06-07 按键精灵开发者2级 可通过提升认证等级来升级勋章：rz.anjian.com	11# 字体大小: t T 发表于 2022-03-25 18:29 | |只看该用户 dashen66654
	回顶部

发送短消息 UID 5982720 帖子 28 精华 0 鲜花 24 朵 铜币 37 个 银币 27 个 性别 在线时间 0 注册时间 2019-01-02 最后登录 2022-04-24 12345 查看公共资料 搜索主题 搜索帖子 a1350s1 a1350s1 组别小学一年级 UID5982720 帖子28 精华0 鲜花24 朵 铜币37 个 银币27 个 在线时间0 注册时间2019-01-02	12# 字体大小: t T 发表于 2022-04-22 06:55 | |只看该用户 66666666666666666
	回顶部

发送短消息 UID 2644341 帖子 34 精华 0 鲜花 16 朵 铜币 28 个 银币 28 个 性别 在线时间 0 注册时间 2014-07-23 最后登录 2023-09-19 查看公共资料 搜索主题 搜索帖子 tb740935087 tb740935087 组别小学二年级 UID2644341 帖子34 精华0 鲜花16 朵 铜币28 个 银币28 个 在线时间0 注册时间2014-07-23	13# 字体大小: t T 发表于 2022-08-07 15:23 | |只看该用户 厉害 学习一下
	回顶部

发送短消息 UID 4009154 帖子 160 精华 0 鲜花 36 朵 铜币 452 个 银币 58 个 性别 在线时间 3360 注册时间 2016-07-11 最后登录 2023-09-23 查看公共资料 搜索主题 搜索帖子 xueqiang xueqiang 组别初中一年级 UID4009154 帖子160 精华0 鲜花36 朵 铜币452 个 银币58 个 在线时间3360 注册时间2016-07-11 按键精灵开发者1级 可通过提升认证等级来升级勋章：rz.anjian.com	14# 字体大小: t T 发表于 2022-08-10 14:56 | |只看该用户 11111111111111
	回顶部

发送短消息 UID 8293273 帖子 44 精华 0 鲜花 22 朵 铜币 45 个 银币 35 个 性别 在线时间 0 注册时间 2021-05-15 最后登录 2022-12-09 查看公共资料 搜索主题 搜索帖子 橙师兄 组别小学二年级 UID8293273 帖子44 精华0 鲜花22 朵 铜币45 个 银币35 个 在线时间0 注册时间2021-05-15	15# 字体大小: t T 发表于 2022-09-25 01:13 | |只看该用户 {:5_129:}{:5_129:}{:5_129:}{:5_129:}{:5_129:}
	回顶部