51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2393|回复: 8
打印 上一主题 下一主题

[求助] 如何能把wintreeview的对象全部展开呢?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2009-4-28 14:03:52 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
想用递归可是传不了参数啊

[ 本帖最后由 xzcg 于 2009-4-28 14:06 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
 楼主| 发表于 2009-4-28 17:31:50 | 只看该作者
自己顶 一下

现在用的是wshell 的模拟按键
还有别的方法吗?
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2009-4-28 19:43:27 | 只看该作者
用childobjects 方法找到所有的+对象,依次点击就可以了
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2009-4-29 16:30:18 | 只看该作者
只能展开一层吧
我想把所有的都展开
想用递归可是又不能传递参数
改怎么办呢?
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2009-4-30 08:05:10 | 只看该作者
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2009-4-30 10:03:36 | 只看该作者
我写了个函数,你44
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2009-4-30 10:04:04 | 只看该作者
Function expand_tree()
Set oDesc=Description.Create()
oDesc("micclass").value="Image"
oDesc("file name").value="plus2.gif"
Set objs=Browser("i@Report通用WEB网络报表平台").Page("i@Report-main").Frame("mainFrame_2").ChildObjects(oDesc)
Numberofobjs=objs.Count()
For i=0 to Numberofobjs-1
        objs(i).Click
        call expand_tree()
Next
End Function
回复 支持 反对

使用道具 举报

该用户从未签到

8#
 楼主| 发表于 2009-4-30 12:57:03 | 只看该作者
oDesc("micclass").value="Image"
oDesc("file name").value="plus2.gif"


这两个是设置+号的属性吧


可是对于windows上面的+不能这样识别
我也没有找到可以识别的办法
回复 支持 反对

使用道具 举报

该用户从未签到

9#
 楼主| 发表于 2009-4-30 12:59:31 | 只看该作者
Function TestFunction(temp)
        If temp.GetItemsCount>0 Then
                For j=1 to temp.GetItemsCount
                        tempstr=temp.GetROProperty("selection")
                    temp.select tempstr
                    temp.expandall tempstr
                Next
        End If
End Function


其中temp是一个wintreeview 的对象

可是不知道怎么找到下一个+号
childobjects
getitem(j)
都搞不定啊

帮帮忙啊
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-9-30 21:32 , Processed in 0.094761 second(s), 28 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表