Select item from list box with right mouse click

[mabond]

Hi

My project has a form, two list boxes (lstArchive and lstSchedule) and two
buttons (btnSendArchive and btnSendSchedule)

Each list box represents the content of a directory. The command buttons
move the selected item out of one directory and into the other and refreshes
the list boxes to reflect the change in directory contents

I now want to add "context menu" functionality to the list boxes to preform
the same function as the two buttons. My problem is I can right click on the
list box and send the selected item to the other directory with the chosen
menu item ..... but right-clicking does not itself select the item over which
the mouse is hovering. In other words I have to left-click to select an item
before I can right-click to activate the contect menu for the selected item.

Is there any way that right-clicking in a list box can be used to select an
item in that box.

Any help would be appreciated

Regards

Michael Bond

[Larry Lard]

mabond wrote:
....

I now want to add "context menu" functionality to the list boxes to preform
the same function as the two buttons. My problem is I can right click on the
list box and send the selected item to the other directory with the chosen
menu item ..... but right-clicking does not itself select the item over which
the mouse is hovering. In other words I have to left-click to select an item
before I can right-click to activate the contect menu for the selected item.

Is there any way that right-clicking in a list box can be used to select an
item in that box.

Private Sub ListBox1_MouseDown(ByVal sender As Object, _
ByVal e As System.Windows.Forms.MouseEventArgs) _
Handles ListBox1.MouseDown
If e.Button = MouseButtons.Right Then
Dim index As Integer = ListBox1.IndexFromPoint(New
Point(e.X, e.Y))
If index >= 0 Then
ListBox1.SelectedItem = ListBox1.Items(index)
End If
End If
End Sub

Because your context menu code fires on MouseUp (right?) this should
slot in just fine.

--
Larry Lard
Replies to group please

[Peter Proost]

Hi, this should work

Private Sub ListBox1_MouseDown(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) _ Handles ListBox1.MouseDown
If e.Button = MouseButtons.Right Then
ListBox1.SelectedIndex = ListBox1.IndexFromPoint(e.X, e.Y)
End If
End Sub

Hth Greetz Peter

--
Programming today is a race between software engineers striving to build
bigger and better idiot-proof programs, and the Universe trying to produce
bigger and better idiots. So far, the Universe is winning. (Rich Cook)

"mabond" <ma****@discussions.microsoft.com> schreef in bericht
news:27**********************************@microsof t.com...

Hi

My project has a form, two list boxes (lstArchive and lstSchedule) and two
buttons (btnSendArchive and btnSendSchedule)

Each list box represents the content of a directory. The command buttons
move the selected item out of one directory and into the other and refreshes the list boxes to reflect the change in directory contents

I now want to add "context menu" functionality to the list boxes to preform the same function as the two buttons. My problem is I can right click on the list box and send the selected item to the other directory with the chosen
menu item ..... but right-clicking does not itself select the item over which the mouse is hovering. In other words I have to left-click to select an item before I can right-click to activate the contect menu for the selected item.
Is there any way that right-clicking in a list box can be used to select an item in that box.

Any help would be appreciated

Regards

Michael Bond

[mabond]

Peter, Larry

Thanks both .... especially for the speed of response.

Appreciate the help

Regards

Michael

"mabond" wrote:

Hi

My project has a form, two list boxes (lstArchive and lstSchedule) and two
buttons (btnSendArchive and btnSendSchedule)

Each list box represents the content of a directory. The command buttons
move the selected item out of one directory and into the other and refreshes
the list boxes to reflect the change in directory contents

I now want to add "context menu" functionality to the list boxes to preform
the same function as the two buttons. My problem is I can right click on the
list box and send the selected item to the other directory with the chosen
menu item ..... but right-clicking does not itself select the item over which
the mouse is hovering. In other words I have to left-click to select an item
before I can right-click to activate the contect menu for the selected item.

Is there any way that right-clicking in a list box can be used to select an
item in that box.

Any help would be appreciated

Regards

Michael Bond

[Herfried K. Wagner [MVP]]

"mabond" <ma****@discussions.microsoft.com> schrieb:

Is there any way that right-clicking in a list box can be used to select
an
item in that box.

\\\
Private Sub ListBox1_MouseUp( _
ByVal sender As Object, _
ByVal e As MouseEventArgs _
) Handles ListBox1.MouseUp
If e.Button = MouseButtons.Right Then
Dim n As Integer = Me.ListBox1.IndexFromPoint(e.X, e.Y)
If n <> ListBox.NoMatches Then
Me.ListBox1.SelectedIndex = n
End If
End If
End Sub
///

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

[Larry Lard]

Herfried K. Wagner [MVP] wrote:

Dim n As Integer = Me.ListBox1.IndexFromPoint(e.X, e.Y)
If n <> ListBox.NoMatches Then
Use of a meaningful named constant, now that's classy :)
Me.ListBox1.SelectedIndex = n

I can't believe I set SelectedItem to Items(n) :(

--
Larry Lard
Replies to group please