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 Georgi
I look to night at home