将对象类名作为参数

Question

我有一个 TC 脚本，可以处理各种屏幕的报告选项。窗口类名称在每个屏幕上都会发生变化，并且由于我希望该脚本在翻译环境中工作，因此窗口标题也会发生变化。第一部分工作正常，但如何解释窗口名称的变化？如果我删除标题，TC 就会出现不明确的窗口识别错误。

当前代码片段（带有一个屏幕的标题）：

w := p.WaitWindow('*', 'Options', 1, 10000);   
if w.Name='frmBasicOpt' then
begin
....

我可以将类名设置为输入的参数，以便我可以省略标题吗？如果是这样，我该怎么做？

头……疼。

谢谢！

Answer 1

不确定我是否理解这项任务，但我会尽力在我理解的范围内提供帮助。
因此，窗口类名称是动态的，这就是您用通配符屏蔽它的原因。但你告诉你，如果你能够参数化它，你无论如何都想使用类名。所以，似乎有一种方法可以在测试执行期间从某处获取类名。如果是这样，您可以将类名放入一个变量，并将该变量作为参数传递给 WaitWindow 方法，并屏蔽标题以避免使用特定于语言的标题：

clsName := ....; // get it from somewhere
w := p.WaitWindow(clsName, '*', 1, 10000);
if w.Name='frmBasicOpt' then
begin

如果我的理解不正确，则无法知道如果事先指定了类名，您可以考虑使用不同的方法来识别选项窗口而不指定标题。可能的解决方案包括：

1. 当对话框打开时，它会变为活动状态。因此，您可以通过 Sys.Desktop.ActiveWindow 获取该对话框。

2. 如果这是一个 MFC 应用程序，请注意窗口的 ControlID 属性 - 它可以在应用程序的代码中设置，用于对象识别。因此，您可以使用 FindChild 方法通过属性值查找窗口。

3. 如果窗口有一些仅特定于该窗口的子对象，您可以创建一个函数来获取 Process 对象的所有子窗口 (FindAllChildren)，迭代列表并检查其中哪个具有这些特定的子窗口对象。

这对你有用吗？如果没有，那么有关您的任务的更多信息可能会帮助我提出其他建议。

亚历克斯