vbscript - QTP Descriptive Programmuing - 加载通过函数创建的对象

Question

我有 10 个不同的测试用例。我想创建不同的 SwfEdit、SwfButton 等对象，只需在函数中说一次，然后在 QTP 中的不同操作中使用这些对象。

我尝试创建一个函数并将其链接到一个测试用例，但是它不起作用。所以我不确定在所有测试用例中链接所有这些对象的正确方法是什么。

Answer 1

如果您坚持在代码中创建对象而不是使用对象存储库，则需要将这些对象存储在某种类型的全局变量中。一个基本的例子可能是一个函数库：

' Declare your global variable to hold the object
Public MyObject

' Create your object from a function
Public Sub InitializeGlobalObject()

    ' Use Descriptive Programing to create your object
    Set MyObject = Window("title:=something").Button("index:=0")

End Sub

这将允许您创建一次对象，然后通过变量引用它

' Click the button
MyObject.Click

您可能会遇到像这样缓存对象的问题，因为它倾向于保留它匹配的最后一个屏幕对象，而对象存储库会在您每次调用它时刷新屏幕对象。您可能需要在对象显示在屏幕上后第一次使用它之前调用它的“刷新”方法。

Answer 2

如果您不打算使用描述性语言，则应首先使用对象存储库添加对象。您应该监视每个对象，然后添加它。