Facebook

For any corporate training requirements Please mail To sudhakar@qtpsudhakar.com
Course Name Date Time Duration Type Location
Selenium Framework Development 22nd July 2019 6.30 AM IST to 8:30 AM IST 15 Days WeekDays Online

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