51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2273|回复: 5
打印 上一主题 下一主题

[原创] 如何创建一个对应的object

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2007-5-30 23:22:52 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
在QTP使用中遇到这样一个问题:

SystemUtil.Run "NotePad.exe"
'这个位置希望加一个WaitProperty方法,在打开NotePad后延迟5S后再关闭NotePad
SystemUtil.CloseDescendentProcesses

不知道在第二行如何创建这个对象?请帮忙,初学QTP,望各位指教,谢谢 sdlkfj2
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2007-5-31 09:00:24 | 只看该作者
这是帮助上的一个例子,希望对楼主有启发.
Sub CloseDescendentProcesses_Example()
'The following example uses the Run method to open a file named type.txt
'in the default text application (Notepad). It then types "happy days",
'saves the file using shortcut keys, and then closes the application.
SystemUtil.Run "C:\type.txt", "", "", ""
Window("Text:=type.txt - Notepad").Type "happy days"
Window("Text:=type.txt - Notepad").Type micAltDwn & "F" & micAltUp
Window("Text:=type.txt - Notepad").Type micLShiftDwn & "S" & micLShiftUp
Window("Text:=type.txt - Notepad").Close
End Sub
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2007-5-31 09:16:48 | 只看该作者
Tip: This method is useful for test run synchronization. Unlike the Exist method, the WaitProperty method enables you to synchronize the test run based on a specific object property. For example, you can instruct QuickTest to wait for a particular string to appear in a static text control:
就是说必须文本框的内容发生了改变,才可以触发WaitProperty,它一般用于synchronization
如果偏要实现也行:用WaitProperty方法,然后用robot设定好时间去改变文本框的内容,这样QTP就能捕捉到,从而触发WaitProperty事件,呵呵
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2007-5-31 10:02:13 | 只看该作者
十分感谢二位的解答 sdlkfj3
呵呵我确实该好好研究一下qtp自带的help了,但现在还是有个地方搞不清,这也是我开始学qtp一直困扰我的地方,就是这个object.
1、譬如例子里的window对象,是如何添加到object Reporsitory呢?
2、如果不添加到对象库里run的时候会报一个找不到对象的错误。record的方式估计是无法录制这个对象吧?
3、除了利用record的方式来添加到对象库之外,我用过手动添加对象到对象库,可没成功,是我操作不对还是其他原因导致的呢?
回复 支持 反对

使用道具 举报

  • TA的每日心情
    奋斗
    2022-7-13 15:22
  • 签到天数: 1 天

    连续签到: 1 天

    [LV.1]测试小兵

    5#
    发表于 2007-5-31 10:03:55 | 只看该作者
    能不能这样处理:
    while not Window("Text:=***.txt - Notepad").Exists
          wait 1
    wend
    wait 5
    Window("Text:=***.txt - Notepad").Close
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    6#
    发表于 2007-5-31 11:43:39 | 只看该作者
    SystemUtil.Run "NotePad.exe"
    Window("Text:=[a-z]* - Notepad").WaitProperty  "visible", True, 3
    Wait 5
    Window("Text:=[a-z]* - Notepad").Close
    这个我试过可以的
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

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

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

    GMT+8, 2024-11-19 22:26 , Processed in 0.077661 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

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