|
发表于 2013-3-6 10:16:41
|
显示全部楼层
广东省揭阳市
写的比较挫,自行优化,。调用精易模块3.12.
成功返回 Internet Explorer_Server 的句柄,这个句柄放 初始化里面就可以了
[e]
.版本 2
.子程序 子程序_获取巧遇卡句柄, 整数型
.局部变量 窗口, 精易_窗口信息, , "0"
.局部变量 i, 整数型
.局部变量 子窗口句柄, 整数型, , "0"
.局部变量 句柄, 整数型
窗口_枚举 (窗口)
.计次循环首 (取数组成员数 (窗口), i)
.如果真 (窗口 .窗口类名 = “TXGFLayerMask”)
窗口_枚举子窗口 (窗口 .窗口句柄, 子窗口句柄, )
.如果 (取数组成员数 (子窗口句柄) > 0)
窗口_枚举子窗口 (子窗口句柄 [1], 子窗口句柄, )
.否则
返回 (0)
.如果结束
窗口_枚举子窗口 (子窗口句柄 [1], 子窗口句柄, )
.如果 (取数组成员数 (子窗口句柄) > 0)
句柄 = 子窗口句柄 [1]
跳出循环 ()
.否则
返回 (0)
.如果结束
.如果真结束
.计次循环尾 ()
返回 (句柄)
[/e] |
|