Facebook

For any corporate training requirements Please mail To sudhakar@qtpsudhakar.com
New Schedule in MindQ Systems, Madhapur By SUDHAKAR
Course Name Date Time Duration Type Branch
Selenium+Appium 16th October 2017 7.30 AM - 9.00 AM IST 45 Days ClassRoom + Online Mind Q Madhapur
Selenium+Appium 30th October 2017 9.30 AM - 11.00 AM IST 45 Days ClassRoom + Online Mind Q Madhapur

A book "Cracking the QTP interview" authored by Sudhakar.Read More. Buy From FlipKart

Monday, May 4, 2009

Menu Object

Menu object applies only window based applications. Default Method For Menu is "Select"
Ex:
Window("Notepad").WinMenu("Menu").Select "File;New Ctrl+N"

Can we do anything more with menu's?
 1. Get Menu list from Application
 2. Get Menu Items from Menu
'Get menu list from application
Dim cnt
Dim n
Dim iPath
cnt = Window("Notepad").WinMenu("Menu").GetItemProperty("", "SubMenuCount") 'Get total Menus count From application
For n = 1 To cnt 
iPath = Window("Notepad").WinMenu("Menu").BuildMenuPath(itemPath, n) 
msgbox Window("Notepad").WinMenu("Menu").GetItemProperty(iPath, "Label")
Next
'Get menu Items from menu
Dim cnt
Dim n
Dim iPath
cnt = Window("Notepad").WinMenu("Menu").GetItemProperty("File", "SubMenuCount") 'Get menu items count in "File" Menu
For n = 1 To cnt 
iPath = Window("Notepad").WinMenu("Menu").BuildMenuPath("File", n) 
msgbox Window("Notepad").WinMenu("Menu").GetItemProperty(iPath, "Label")
Next

No comments :

Post a Comment