在TestComplete脚本中使用TTabSet

Question

我试图通过VBScript (用于测试自动化)为我们的Delphi应用程序单击TTabSet标签，但在不使用页面坐标的情况下很难做到这一点。有没有人有使用这个选项卡类的经验？

使用TestComplete的Object Spy，我可以查看每个选项卡的RTTI TabIndex，但是我似乎不能将它传递给clicktab方法来选择它(TestComplete报告错误，它找不到选项卡，并且存在0项)。

我问过创建TestComplete的人，他们说TTabSet不是一个受支持的选项卡控件，但他们建议我可以使用TTabSet的一些原生方法来让它为我工作。

有什么想法吗？

Answer 1

TabIndex是可读写的，所以你可以这样做：

tabSetObj.TabIndex = 2   ' Select tab with index 2

根据文档，效果应该与您实际单击该选项卡时的效果相同：

将值分配给TabIndex时，将发生选项卡集的OnClick事件，随后是OnChange事件，就像用户单击了新选项卡一样。