《软件自动化测试成功之道》节选4 - 标准控件的特殊问题的处理方法

《软件自动化测试成功之道》节选4 - 标准控件的特殊问题的处理方法
http://www.china-pub.com/196509
 
 
 
 
 
 

在测试脚本回放过程中发现，单击.NET的ToolStrip控件的按钮有时候会失灵。大部分情况下，使用下面的脚本是可以成功单击ToolStrip按钮的：
w_ToolStrip.ClickItem(‘新增课件’);
但是有时候会“失灵”，即执行了单击操作但是没有触发单击操作所关联的事件，例如本来单击某个ToolStrip按钮会弹出窗口而没有弹出，但是查看Log可以看到执行了鼠标单击操作的信息，如图3.5所示：
 
 
 
这个问题的解决办法如下，使用ToolStrip测试对象的PerformClick方法，强制执行点击操作：
//.............................................................................
// 目的：单击指定ToolStrip控件上的某个按钮
// 输入参数：
//            ToolStrip : ToolStrip控件对象
//            Name : 按钮名称          
// 返回结果：无
// 注意事项：
// 作者：陈能技
// 日期：2008-5-22
//.............................................................................
Function ToolStrip_ClickItem(ToolStrip,Name);
  Var I :OleVariant;
begin
  For I := 0 to ToolStrip.Items.Count-1 do
  begin
    // 找到指定名称的按钮
    IF varToStr(ToolStrip.Items.Item[I].Text) = Name then
    begin
      // 执行单击操作
      ToolStrip.Items.Item[I].PerformClick();
      Break;
    end;
  end;
end;
使用PerformClick方法可以解决一部分问题，不能解决全部问题，当单击ToolStrip中的按钮会弹出另外一个窗口的情况下，PerformClick虽然能执行成功，但是弹出的窗口将挡住其释放鼠标按钮，并且会暂停脚本的执行，如图3.6所示：
 
 
 
 
在这种情况下，可以采用下面的方法：
//.............................................................................
// 目的：单击指定ToolStrip控件上的某个按钮
// 输入参数：
//            ToolStrip : ToolStrip控件对象
//            Name : 按钮名称          
// 返回结果：无
// 注意事项：解决弹出的窗口挡住其释放鼠标按钮并暂停脚本的执行的问题
//           这种方法在单击ToolStrip中的按钮会弹出另外一个窗口的情况下使用
// 作者：陈能技
// 日期：2008-5-22
//.............................................................................
Function ToolStrip_ClickItem_2(ToolStrip,Name);
  Var I :OleVariant;
begin
  For I := 0 to ToolStrip.Items.Count-1 do
  begin
    // 找到指定名称的按钮
    IF varToStr(ToolStrip.Items.Item[I].Text) = Name then
    begin
      // 执行单击操作
      ToolStrip.Items.Item[I].Select();
      ToolStrip.Keys(' ');
      Break;
    end;
  end;
end;
这种方法改用了对ToolStrip测试对象发送键盘按键的方式，首先使用ToolStrip测试对象的Select方法选中所需的按钮，然后发送一个空格键，模拟按下该按钮。

 
 
 
 
 

《软件自动化测试成功之道》节选4 - 标准控件的特殊问题的处理方法

http://www.china-pub.com/196509