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
Hi Georgi,
Thank you for this solution, but I try to working more with the object, I have to build a vbscript wrapper for some object that we used.
Best regards
Thanks for provided information, but my suggestion is to use TestAdvantage, because by this way you will be able to create a fully functional vbscripts that could test your AUT with our controls. If you are using TestAdvantage you will be able to access all specific Infragistics properties in the controls, otherwise you could use only default methods (for example Click method with coordinates over our the button)