Hello guys,
Could you please suggest, how can I get access to the toolbar item? Please see below.
In general I need to check if this item sticked or not.
And also, could you please share the link to the PerformToolAction object description (methods, etc)
Thank you in advance!
Hi,
I try to reproduce your scenario. Could you please take a look at the provided code below and attached video file. Let me know if you have any questions.
SwfWindow("Form1").Move 478,148SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrClick, "UltraToolbar1", "ButtonTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrClick, "UltraToolbar1", "StateButtonTool1" SwfWindow("Form1").Move 477,300SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrDropDown, "UltraToolbar1", "PopupMenuTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrMenu, tbmgrClick, "UltraToolbar1,PopupMenuTool1", "ButtonTool2" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrDropDown, "UltraToolbar1", "PopupMenuTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrMenu, tbmgrClick, "UltraToolbar1,PopupMenuTool1", "StateButtonTool2" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrDropDown, "UltraToolbar1", "PopupMenuTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrMenu, tbmgrClick, "UltraToolbar1,PopupMenuTool1", "ButtonTool2" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrClick, "UltraToolbar1", "ButtonTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrClick, "UltraToolbar1", "StateButtonTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrDropDown, "UltraToolbar1", "PopupMenuTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrMenu, tbmgrClick, "UltraToolbar1,PopupMenuTool1", "ButtonTool2" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrDropDown, "UltraToolbar1", "PopupMenuTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrMenu, tbmgrClick, "UltraToolbar1,PopupMenuTool1", "StateButtonTool2" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrDropDown, "UltraToolbar1", "PopupMenuTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrMenu, tbmgrClick, "UltraToolbar1,PopupMenuTool1", "StateButtonTool2" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrDropDown, "UltraToolbar1", "PopupMenuTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrMenu, tbmgrClick, "UltraToolbar1,PopupMenuTool1", "StateButtonTool2" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrClick, "UltraToolbar1", "StateButtonTool1" SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top").PerformToolAction tbmgrToolbar, tbmgrClick, "UltraToolbar1", "ButtonTool1" SwfWindow("Form1").Close
Video:
Thank you for your response. It is clear how to press menu item. The thing that I trying to understend is - how could I check if the menu item is sticked or not. For example, on very schematic level like this: if Normal 0 false false false EN-US X-NONE X-NONE MicrosoftInternetExplorer4 SwfWindow("Form1").SwfObject("_Form1_Toolbars_Dock_Area_Top") .PerformToolAction tbmgrToolbar, tbmgrClick, "UltraToolbar1", "StateButtonTool1".sticked then do smth else so smth end if