QTPのWinMenuオブジェクトのテスト

4319 ワード

WinMenuオブジェクトとは、メニューコントロールを指し、一般的なテスト操作はSelectメソッドであり、ユーザーがメニュー項目を選択することをシミュレートします.BuildMenuPathメソッドを使用して、MenuPath=objectのようなメニューパスを構築することができる.WinMenu("Menu").BulidMenuPath(";")      object.WinMenu("Menu").Select MenuPathはIndexを使用してメニュー項目を指定することもできる:MenuPath=object.WinMenu("Menu").BulidMenuPath(1,2)      object.WinMenu("Menu").Select MenuPath
以下のスクリプトは、BuildMenuPath(1,1)によりカウンタプログラムの「編集」メニュー項目の「コピー」を構築し、BuildMenuPath(1,2)によりカウンタプログラムの「編集」メニュー項目の「貼り付け」を構築します.
SystemUtil.CloseProcessByName "calc.exe"
Systemutil.Run "calc.exe", "","","","1"

rem
Set WinDescription = Description.Create
WinDescription("regexpwndtitle").value =" "

Set MenuDescription = Description.Create
MenuDescription("menuobjtype").value ="2"

Call calc("1")
Call calc("2")
rem BuildMenuPath
MenuPath=Window(WinDescription).WinMenu(MenuDescription).BuildMenuPath(1,1)
Window(WinDescription).WinMenu(MenuDescription).Select MenuPath
Call calc("\+")
MenuPath2=Window(WinDescription).WinMenu(MenuDescription).BuildMenuPath(1,2)
Window(WinDescription).WinMenu(MenuDescription).Select MenuPath2
Call calc("\=")

rem
function calc(input)
Set WinDescription = Description.Create
WinDescription("regexpwndtitle").value =" "
Set inputDescription = Description.Create
inputDescription("text").value =input
Window(WinDescription).WinButton(inputDescription).Click
End function

以上のスクリプトは計算機プログラムの様々な計算に適応できます.注意:calc()関数のパラメータは、【+】操作を実行する場合、正規表現変換が必要です.