Context :
I work with HP QTP (quick test pro) tool for testing. I am currently writing scripts to test a GUI created with infragistics. I use vbscript to create the test scripts.
I trying to find the way to click on the right button of the 'rightbuttons' collection in the component UltraTextEditor
All help is appreciated.
Best Regards
Lino
Hello Lino,
I made small sample for you. Could you please take a look at the attached video file for more details and let me know if you have any questions.
Here is the script from my test sample:
SwfWindow("Form1").Move 545,177SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 186,21SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 186,21SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 186,21SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 150,162SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 95,160SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 61,162SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 68,196SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 187,23SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 206,23SwfWindow("Form1").Dialog("#32770").WinButton("OK").ClickSwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 229,24SwfWindow("Form1").Dialog("#32770").WinButton("OK").ClickSwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 230,24SwfWindow("Form1").Dialog("#32770").WinButton("OK").ClickSwfWindow("Form1").SwfEditor("SwfEditor").SetCaretPos 0,16SwfWindow("Form1").SwfEditor("SwfEditor").Type micReturn SwfWindow("Form1").SwfEditor("SwfEditor").Type "Test Text"SwfWindow("Form1").SwfEditor("SwfEditor").Type micReturn SwfWindow("Form1").SwfEditor("SwfEditor").Type "Testttttttttttt"SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micBack SwfWindow("Form1").SwfEditor("SwfEditor").Type micReturn SwfWindow("Form1").SwfEditor("SwfEditor").Type "Sample"SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 187,26SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 159,54SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 151,92SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 149,121SwfWindow("Form1").SwfWindow("SwfWindow").SwfObject("ultraCalculator1").Click 149,158SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 187,26SwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 209,28SwfWindow("Form1").Dialog("#32770").WinButton("OK").ClickSwfWindow("Form1").SwfObject("ultraTextEditor1풸1ꨀ牑").Click 228,25SwfWindow("Form1").Dialog("#32770").WinButton("OK").ClickSwfWindow("Form1").Close
Let me know if you have any questions.
Regards
Get TestAdvantage (for HP QTP) for Windows Forms: http://es.infragistics.com/products/testadvantage-windows-forms-qhp/
The UltraTextEditor wrapper in this product have a list of methods to interact with the buttons collections (left and right):
I hope this was helpful,
Ammar