|
发表于 2016-7-28 15:21:16
|
显示全部楼层
湖南省永州市
.版本 2
.支持库 spec
.子程序 子程序_窗口是否打开, 逻辑型
.参数 参_要找的标题, 文本型
.参数 参_回传句柄, 整数型, 参考
.局部变量 句柄数组, 整数型, , "0"
.局部变量 s, 整数型
.局部变量 找到, 逻辑型
.局部变量 临时文本, 文本型
.局部变量 精易_矩形, 精易_矩形
.局部变量 临时句柄, 整数型
.局部变量 超时, 整数型
窗口_枚举所有子窗口 (, 句柄数组, “TXGuiFoundation”)
.计次循环首 (取数组成员数 (句柄数组), s)
临时句柄 = 句柄数组 [s]
临时文本 = 窗口_取标题 (临时句柄)
.如果真 (寻找文本 (临时文本, 参_要找的标题, , 假) ≠ -1)
调试输出 (“找到添加好友句柄”, 临时文本)
.循环判断首 ()
窗口_置位置和大小 (临时句柄, 0, 290)
延迟 (500)
精易_矩形 = 窗口_取位置和大小 (临时句柄)
调试输出 (“顶边”, 精易_矩形.顶边, “左边”, 精易_矩形.左边)
超时 = 超时 + 1
.如果真 (超时 ≥ 6)
跳出循环 ()
.如果真结束
.循环判断尾 (精易_矩形.左边 ≠ 290 且 精易_矩形.顶边 ≠ 0)
窗口_置顶 (临时句柄)
参_回传句柄 = 临时句柄
找到 = 真
跳出循环 ()
.如果真结束
.计次循环尾 ()
返回 (找到)
|
|