草稿测试

被遗弃的小孩

  

子程序名	返回值类型	公开	备 注
取QQ消息_9_1_2			QQ9.1.2
参数名	类 型	参考	可空	数组	备 注
窗口句柄	整数型
标题栏集合	文本型
消息栏集合	文本型

变量名	类 型	静态	数组	备 注
pacc	整数型
ia	IAccessible
count	整数型
i	整数型
计次	整数型
路径	整数型		0
flag	逻辑型

如果真 (AccessibleObjectFromWindow (窗口句柄, #OBJID_WINDOW, { 224, 54, 135, 97, 61, 60, 207, 17, 129, 12, 0, 170, 0, 56, 155, 113 }, pacc) ＝ 0)
' 如果真 (指针到短整数 (tmp) ＝ #VT_I4)
ia.Init (pacc)
ia.Init (ia.get_accChild (-4))
路径 ＝ { 3, 3, 1, 1, 1 }
计次循环首 (取数组成员数 (路径), i)
ia.Init (ia.get_accChild (路径 [i]))
计次循环尾 ()
count ＝ ia.get_accChildCount ()
计次循环首 (count, i)
' 调试输出 (i)
ia.Init (ia.get_accChild (i))
如果真 (是否为空 (标题栏集合) ＝ 假)
加入成员 (标题栏集合, ia.get_accName (0))

' 调试输出 (ia.get_accRole (0), ia.get_accName (0), ia.get_accValue (0))
ia.Init (ia.get_accParent ())
计次循环尾 ()
计次循环首 (取数组成员数 (路径), i)
ia.Init (ia.get_accParent ())
计次循环尾 ()
路径 ＝ { 3, 2 }
计次循环首 (取数组成员数 (路径), i)
ia.Init (ia.get_accChild (路径 [i]))
计次循环尾 ()
count ＝ ia.get_accChildCount ()
路径 ＝ { 1, 1, 2, 1, 2, 1, 2, 1, 5, 1 }
计次循环首 (count, 计次)
路径 [1] ＝ 计次
flag ＝ 假
计次循环首 (取数组成员数 (路径), i)
如果真 (i ＝ 3 且 ia.get_accChildCount () ≠ 2)
如果真 (是否为空 (标题栏集合) ＝ 假)
删除成员 (标题栏集合, 计次, 1)

计次循环首 (2, i)
ia.Init (ia.get_accParent ())
计次循环尾 ()
flag ＝ 真
跳出循环 ()

ia.Init (ia.get_accChild (路径 [i]))
计次循环尾 ()
如果真 (flag ＝ 假)
如果真 (是否为空 (消息栏集合) ＝ 假)
加入成员 (消息栏集合, 文本_替换 (ia.get_accValue (0), , , , 字符 (13), #换行符 ))

' 调试输出 (ia.get_accValue (0))
' 调试输出 (文本_替换 (ia.get_accValue (0), , , , 字符 (13), #换行符))
计次循环首 (取数组成员数 (路径), i)
ia.Init (ia.get_accParent ())
计次循环尾 ()

计次循环尾 ()
CallObject (pacc, 2)

.版本 2<br /> <br /> .子程序 取QQ消息_9_1_2, , 公开, QQ9.1.2<br /> .参数 窗口句柄, 整数型<br /> .参数 标题栏集合, 文本型, 可空 数组<br /> .参数 消息栏集合, 文本型, 可空 数组<br /> .局部变量 pacc, 整数型<br /> .局部变量 ia, IAccessible<br /> .局部变量 count, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 计次, 整数型<br /> .局部变量 路径, 整数型, , "0"<br /> .局部变量 flag, 逻辑型<br /> <br /> .如果真 (AccessibleObjectFromWindow (窗口句柄, #OBJID_WINDOW, { 224, 54, 135, 97, 61, 60, 207, 17, 129, 12, 0, 170, 0, 56, 155, 113 }, pacc) ＝ 0)<br />     ' 如果真 (指针到短整数 (tmp) ＝ #VT_I4)<br />     ia.Init (pacc)<br />     ia.Init (ia.get_accChild (-4))<br />     路径 ＝ { 3, 3, 1, 1, 1 }<br />     .计次循环首 (取数组成员数 (路径), i)<br />         ia.Init (ia.get_accChild (路径 <i>))<br />     .计次循环尾 ()<br />     count ＝ ia.get_accChildCount ()<br />     .计次循环首 (count, i)<br />         ' 调试输出 (i)<br />         ia.Init (ia.get_accChild (i))<br />         .如果真 (是否为空 (标题栏集合) ＝ 假)<br />             加入成员 (标题栏集合, ia.get_accName (0))<br />         .如果真结束<br /> <br />         ' 调试输出 (ia.get_accRole (0), ia.get_accName (0), ia.get_accValue (0))<br />         ia.Init (ia.get_accParent ())<br />     .计次循环尾 ()<br />     .计次循环首 (取数组成员数 (路径), i)<br />         ia.Init (ia.get_accParent ())<br />     .计次循环尾 ()<br /> <br />     路径 ＝ { 3, 2 }<br />     .计次循环首 (取数组成员数 (路径), i)<br />         ia.Init (ia.get_accChild (路径 <i>))<br />     .计次循环尾 ()<br />     count ＝ ia.get_accChildCount ()<br />     路径 ＝ { 1, 1, 2, 1, 2, 1, 2, 1, 5, 1 }<br />     .计次循环首 (count, 计次)<br />         路径 [1] ＝ 计次<br />         flag ＝ 假<br />         .计次循环首 (取数组成员数 (路径), i)<br />             .如果真 (i ＝ 3 且 ia.get_accChildCount () ≠ 2)<br />                 .如果真 (是否为空 (标题栏集合) ＝ 假)<br />                     删除成员 (标题栏集合, 计次, 1)<br />                 .如果真结束<br /> <br />                 .计次循环首 (2, i)<br />                     ia.Init (ia.get_accParent ())<br />                 .计次循环尾 ()<br />                 flag ＝ 真<br />                 跳出循环 ()<br />             .如果真结束<br /> <br />             ia.Init (ia.get_accChild (路径 <i>))<br />         .计次循环尾 ()<br /> <br />         .如果真 (flag ＝ 假)<br />             .如果真 (是否为空 (消息栏集合) ＝ 假)<br />                 加入成员 (消息栏集合, 文本_替换 (ia.get_accValue (0), , , , 字符 (13), #换行符))<br />             .如果真结束<br /> <br />             ' 调试输出 (ia.get_accValue (0))<br />             ' 调试输出 (文本_替换 (ia.get_accValue (0), , , , 字符 (13), #换行符))<br />             .计次循环首 (取数组成员数 (路径), i)<br />                 ia.Init (ia.get_accParent ())<br />             .计次循环尾 ()<br /> <br /> <br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br />     CallObject (pacc, 2)<br /> .如果真结束

补充内容 (2019-5-24 19:43):
不好意思，我测试论坛的草稿功能。结果好像是有bug，点一下保存草稿，就当做帖子发出来了。

呵呵仙

[url=]20 秒后保存[/url]

[url=]保存数据[/url]

|

[url=]恢复数据[/url]

试下右下的功能,不会发出去,这是回复功能

,忘了主题是不是一样了!?