|
枚举窗口 | 整数型 | |
|
接收数组 | 窗口信息 | | | |
可视窗口 | 逻辑型 | | | | 排除空标题窗口 | 逻辑型 | | | | 屏蔽系统窗口 | 逻辑型 | | | | 只取父窗口 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
传参 | 整数型 | | |
x | 整数型 | | |
局父句柄 | 整数型 | | |
y | 整数型 | | |
清除数组 (集_窗口列表
)传参 = 0
如果真 (是否为空 (可视窗口
))

可视窗口 = 真
如果真 (是否为空 (排除空标题窗口
))

排除空标题窗口 = 真
如果真 (是否为空 (屏蔽系统窗口
))

屏蔽系统窗口 = 真
如果真 (是否为空 (只取父窗口
))

只取父窗口 = 真
如果真 (可视窗口
)
传参 = 传参 + 1
如果真 (排除空标题窗口
)
传参 = 传参 + 2
如果真 (屏蔽系统窗口
)
传参 = 传参 + 4
EnumWindows (&枚举过程, 传参)
如果真 (只取父窗口
)
计次循环首 (取数组成员数 (集_窗口列表
), x
)

变量循环首 (取数组成员数 (集_窗口列表
), x + 1, -1, y
)


如果真 (GetParent (集_窗口列表
[x
].窗口句柄
) = 集_窗口列表
[y
].窗口句柄
) 


删除成员 (集_窗口列表, x,
)





变量循环尾 ()
计次循环尾 ()接收数组 = 集_窗口列表返回 (取数组成员数 (集_窗口列表
))
变量名 | 类 型 | 静态 | 数组 | 备 注 |
局窗口信息 | 窗口信息 | | |
局窗口相关 | WINDOWINFO | | |
局父句柄 | 整数型 | | |
x | 整数型 | | |
y | 整数型 | | |
局窗口信息.窗口句柄 = hwnd
局窗口信息.窗口标题 =
取窗口标题 (hwnd
)局窗口信息.窗口类名 =
取窗口类名 (hwnd
)
如果 (lParam = 0
)
加入成员 (集_窗口列表, 局窗口信息
)
GetWindowInfo (hwnd, 局窗口相关
)
如果真 (位与 (lParam, 1
) > 0
) 

如果真 (位与 (局窗口相关.窗口样式,
#WS_VISIBLE ) < 1
) 

返回 (1
)



如果真 (位与 (lParam, 2
) > 0
) 

如果真 (局窗口信息.窗口标题 =
“”)

返回 (1
)



如果真 (位与 (lParam, 4
) > 0
)

如果真 (局窗口信息.窗口标题 =
“Program Manager” 或 取窗口类名 (GetParent (hwnd
)) =
“Shell_TrayWnd”) 

返回 (1
)


加入成员 (集_窗口列表, 局窗口信息)返回 (1)