句柄操作模块及例程,9种搜索条件,让你在纷乱的WINDOWS下轻松地找到要操作的对象!
独家推出按分布查找组件,及上级组件条件!
模块名称:句柄操作模块
原创按分布方式查找组件,实现一行代码获取组件句柄!
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 句柄组, 整数型, , "0"
.局部变量 i, 整数型
编辑框1.内容 = “”
查找组件 (, { “,4,2,1” }, 句柄组, , { “”, “Static”, “”, “#32770” }) ' 一行代码取QQ所有普通聊天对象句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个普通聊天对象:”, 取标题 (句柄组 ), #换行符)
.计次循环尾 ()
查找组件 (, { “,4,3,1” }, 句柄组, , { “”, “Static”, “”, “#32770” }) ' 一行代码取QQ所有手机聊天对象句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个手机聊天对象:”, 取标题 (句柄组 ), #换行符)
.计次循环尾 ()
查找组件 (, { “,4,21,1” }, 句柄组, , { “”, “RICHEDIT”, “”, “#32770” }) ' 一行代码取QQ所有聊天窗口文本输入框句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个聊天输入文本框句柄:”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
查找组件 (, { “,4,20” }, 句柄组, , { “”, “RichEdit20A”, “”, “#32770” }) ' 一行代码取QQ所有聊天窗口聊天信息框句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个聊天信息框句柄:”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
.如果真 (取数组成员数 (句柄组) > 0)
查找组件 (, , 句柄组, { “”, “发送(S)” }, { “”, “”, “”, “#32770” }) ' 一行代码取QQ所有聊天窗口发送按钮句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个聊天发送按钮句柄:”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
.如果真结束
查找组件 (, { “,4,4” }, 句柄组, , { “”, “RICHEDIT”, “”, “#32770” }) ' 一行代码取QQ所有手机聊天窗口文本输入框句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个手机聊天输入文本框句柄:”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
.如果真 (取数组成员数 (句柄组) > 0)
查找组件 (, { “,4,18” }, 句柄组, , { “”, “RICHEDIT”, “”, “#32770” }) ' 一行代码取QQ所有手机聊天窗口手机号码输入框句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个手机号码输入框句柄:”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
查找组件 (, { “,4,5” }, 句柄组, , { “”, “RICHEDIT”, “”, “#32770” }) ' 一行代码取QQ所有聊天窗口手机聊天信息框句柄(普通聊天窗口也有这个信息框)
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个手机聊天信息框句柄:”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
查找组件 (, , 句柄组, { “”, “发送(&S)” }, { “”, “”, “”, “#32770” }) ' 一行代码取QQ所有聊天窗口手机信息发送按钮句柄(普通聊天窗口也有这个按钮)
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个手机信息发送按钮:”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
.如果真结束
查找组件 (, , 句柄组, , { “”, “Internet Explorer_Server”, “”, “IEFrame” }) ' 一行代码取所有IE窗口Internet Explorer_Server组件象句柄
.计次循环首 (取数组成员数 (句柄组), i)
编辑框1.加入文本 (“第” + 到文本 (i) + “个Internet Explorer_Server组件句柄”, 到文本 (句柄组 ), #换行符)
.计次循环尾 ()
点击进入下载-acdddr.rar |