Mouse events for CommandBar

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   How can I get mouse events for a CommandBars object? 

Currently I have a Sheridan toolbar which responds to standard VB
events such as MouseUp, MouseDown, MouseMove, etc. and need these
events in CodeJock CommandBars. The reason is users can right-click a
toolbar icon which displays a popup menu specific for that icon. The
popup menu has many options specific to the application I am creating,
such as security permissions for the icon.

So, how can I display my own popup menu when a user right clicks on a CodeJock toolbar icon?

Thanks.

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
IAgree Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 22 July 2004 Location: Bosnia Hercegovina Status: Offline Points: 1	Post Options Post Reply Quote IAgree Report Post Thanks(0) Quote Reply Topic: Mouse events for CommandBar Posted: 22 July 2004 at 11:46pm
	How can I get mouse events for a CommandBars object? Currently I have a Sheridan toolbar which responds to standard VB events such as MouseUp, MouseDown, MouseMove, etc. and need these events in CodeJock CommandBars. The reason is users can right-click a toolbar icon which displays a popup menu specific for that icon. The popup menu has many options specific to the application I am creating, such as security permissions for the icon. So, how can I display my own popup menu when a user right clicks on a CodeJock toolbar icon? Thanks.

leojay Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 07 March 2005 Status: Offline Points: 27	Post Options Post Reply Quote leojay Report Post Thanks(0) Quote Reply Posted: 28 March 2005 at 8:35pm
	I wonder how to handle these mouse events too. I set the mouse pointer of main form to 9: Me.MousePointer = 9 and i want to set the mouse pointer back to default pointer when the user moved the mouse out of the main form.

Boyd Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 08 December 2003 Location: United States Status: Offline Points: 285	Post Options Post Reply Quote Boyd Report Post Thanks(0) Quote Reply Posted: 28 March 2005 at 9:13pm
	The 'ControlSelected' event is fired when you move the mouse over a control, and the 'ControlSelected' event is fired again when you move off the control (with a null value passed for the selected control). There is no standard way to detect right mouse clicks. Not sure if there are any hacks to get around it.

leojay Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 07 March 2005 Status: Offline Points: 27	Post Options Post Reply Quote leojay Report Post Thanks(0) Quote Reply Posted: 28 March 2005 at 9:57pm
	I found a temporary solution to my problem. Dim ptMouse As POINTAPI Dim rt As RECT rt = GetCommandBarRect If GetCapture <> Me.hwnd Then ptMouse = GetCursor If Not (ptMouse.X < rt.Right And ptMouse.X > rt.Left And ptMouse.Y < rt.Bottom And ptMouse.Y > rt.Top) And Me.MousePointer = 9 Then Me.MousePointer = 0 End If End If the GetCursor() and GetCommandBarRect() are my functions to get mouse cursor's position and CommandBar's client area, respectively. I hope it will be useful to you.