如何以编程方式设置查看（编辑器）选项？

Question

我想确保所有团队成员在 QTP 中使用相同的编辑器设置。

但是虽然全局选项 (Tools/Options) 对话框的配置选项很容易使用 OTA 寻址（使用 .Options 对象），但我找不到任何关于以编程方式访问视图选项的文档 ( Tools/View 选项）对话框的配置选项。

经过一些挖掘，我发现位于 QTP 的 bin 子目录中的 QTEditor.ini 包含我想要重置的设置。

那么有没有API解决方案（相当于QTP的Options对象）来修改视图选项，还是必须直接操作ini文件？

Answer 1

QTP视图（或：编辑器）设置似乎没有任何已知的API，因此必须直接操作ini文件。

不幸的是，在纯 VBScript 中没有简单的方法可以做到这一点：您需要为此使用 WritePrivateProfileStringA KERNEL32 WINAPI 函数，即使它是分阶段的out，但是由于 VBScript 不支持 DLL 导入，剩下的选项是：

1. 为 WritePrivateProfileStringA 编写一个 COM DLL 包装器，并调用它（矫枉过正）
2. 或者用 VBScript 编写您自己的 INI 文件解析器（和编写器）（如果您问我，这也是矫枉过正）
3. 请记住 QTP 有很好的 Extern.Declare 方法，它确实允许调用 DLL 函数，并使用该方法调用 WritePrivateProfileStringA.

我选择了选项 3。这意味着 "resetter" 脚本是一个 QTP 测试，而不是一个紧凑的 VBScript，但是没有地狱就没有天堂，那又怎样。

如果有人对源代码感兴趣，我会post应要求提供。