窗口_枚举所有子窗口 递归遍历所有子窗口 调用子程序判断

searchjack

  

子程序名	返回值类型	公开	备 注
窗口_模糊遍历窗口_DJH			返回满足条件的第一个窗口的句柄
参数名	类 型	参考	可空	数组	备 注
父窗口句柄	整数型				为空，则为桌面句柄
要找的窗口类名	文本型
要找的窗口标题	文本型
装载函数	子程序指针				如果指定数组，则遍历所有满足条件的子窗口，并将所有句柄写入该数组中。

变量名	类 型	静态	数组	备 注
窗口句柄	整数型
是否合法	逻辑型
ClassName	文本型
TitleName	文本型
获取子窗口句柄	整数型		0
数量	整数型
次	整数型

如果真 (父窗口句柄 ＝ 0)
返回 ()

是否合法 ＝ 真
ClassName ＝ 窗口_取类名 (父窗口句柄)
TitleName ＝ 窗口_取标题 (父窗口句柄)
如果真 (要找的窗口类名 ≠ “”)
如果真 (寻找文本 (到小写 (ClassName), 到小写 (要找的窗口类名), , 假) ＝ -1)
是否合法 ＝ 假
处理事件 ()
如果真 (要找的窗口标题 ≠ “”)
如果真 (寻找文本 (到小写 (TitleName), 到小写 (要找的窗口标题), 1, 假) ＝ -1)
是否合法 ＝ 假
处理事件 ()

判断 (是否合法)
程序_Call (到整数 (装载函数), 父窗口句柄, lstrcpyn_文本型 (ClassName, ClassName, 0), lstrcpyn_文本型 (TitleName, TitleName, 0), , )



' 窗口句柄 ＝ GetWindow (父窗口句柄, 5)
' 调试输出 (1, 父窗口句柄, 窗口_取类名 (父窗口句柄), 窗口_取标题 (父窗口句柄))
如果真 (窗口_是否有子窗口 (父窗口句柄) ＝ 真)
' 窗口句柄 ＝ GetWindow (窗口句柄, 2)
数量 ＝ 窗口_枚举子窗口 (父窗口句柄, 获取子窗口句柄, )
计次循环首 (数量, 次)
如果真 (获取子窗口句柄 [次] ≠ 0)
窗口_模糊遍历窗口_DJH (获取子窗口句柄 [次], 要找的窗口类名, 要找的窗口标题, 装载函数)

计次循环尾 ()

.版本 2<br /> <br /> .子程序 窗口_模糊遍历窗口_DJH, , 公开, 返回满足条件的第一个窗口的句柄<br /> .参数 父窗口句柄, 整数型, 可空, 为空，则为桌面句柄<br /> .参数 要找的窗口类名, 文本型, 可空<br /> .参数 要找的窗口标题, 文本型, 可空<br /> .参数 装载函数, 子程序指针, , 如果指定数组，则遍历所有满足条件的子窗口，并将所有句柄写入该数组中。<br /> .局部变量 窗口句柄, 整数型<br /> .局部变量 是否合法, 逻辑型<br /> .局部变量 ClassName, 文本型<br /> .局部变量 TitleName, 文本型<br /> .局部变量 获取子窗口句柄, 整数型, , "0"<br /> .局部变量 数量, 整数型<br /> .局部变量 次, 整数型<br /> <br /> .如果真 (父窗口句柄 ＝ 0)<br />     返回 ()<br /> .如果真结束<br /> <br /> 是否合法 ＝ 真<br /> ClassName ＝ 窗口_取类名 (父窗口句柄)<br /> TitleName ＝ 窗口_取标题 (父窗口句柄)<br /> .如果真 (要找的窗口类名 ≠ “”)<br />     .如果真 (寻找文本 (到小写 (ClassName), 到小写 (要找的窗口类名), , 假) ＝ -1)<br />         是否合法 ＝ 假<br />     .如果真结束<br />     处理事件 ()<br /> .如果真结束<br /> .如果真 (要找的窗口标题 ≠ “”)<br />     .如果真 (寻找文本 (到小写 (TitleName), 到小写 (要找的窗口标题), 1, 假) ＝ -1)<br />         是否合法 ＝ 假<br />     .如果真结束<br />     处理事件 ()<br /> .如果真结束<br /> <br /> .判断开始 (是否合法)<br />     程序_Call (到整数 (装载函数), 父窗口句柄, lstrcpyn_文本型 (ClassName, ClassName, 0), lstrcpyn_文本型 (TitleName, TitleName, 0), , )<br /> .默认<br /> <br /> .判断结束<br /> <br /> ' 窗口句柄 ＝ GetWindow (父窗口句柄, 5)<br /> ' 调试输出 (1, 父窗口句柄, 窗口_取类名 (父窗口句柄), 窗口_取标题 (父窗口句柄))<br /> <br /> .如果真 (窗口_是否有子窗口 (父窗口句柄) ＝ 真)<br />     ' 窗口句柄 ＝ GetWindow (窗口句柄, 2)<br /> <br />     数量 ＝ 窗口_枚举子窗口 (父窗口句柄, 获取子窗口句柄, )<br />     .计次循环首 (数量, 次)<br /> <br />         .如果真 (获取子窗口句柄 [次] ≠ 0)<br />             窗口_模糊遍历窗口_DJH (获取子窗口句柄 [次], 要找的窗口类名, 要找的窗口标题, 装载函数)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br /> <br /> .如果真结束

  

子程序名	返回值类型	公开	备 注
遍历窗口Call
参数名	类 型	参考	可空	数组	备 注
hwnd	整数型
窗口类名	文本型
窗口标题	文本型

调试输出 (hwnd, 窗口类名, 窗口标题)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 遍历窗口Call<br /> .参数 hwnd, 整数型<br /> .参数 窗口类名, 文本型<br /> .参数 窗口标题, 文本型<br /> <br /> 调试输出 (hwnd, 窗口类名, 窗口标题)

调用库： 精易模块

pq9999

不错，学习了

Hi拂尘

能发出来完整的 .e 不

epwne

支持一下！！！！

hujunchao

能发出来完整的 .e 不

小小小小123

学习了学习了

nydqg

学习了学习了

15123845806

点个不花钱的赞在收藏这样就有13个字符了

懒人定制软件

我读书少，不要骗我  来回血

ihty265

支持下，很好看的界面

124149449

感谢分享，很给力！~