Which control is under the mouse?

[Lunatic3]

I was thinking of the way to detect which control is under the mouse. I couldnt find an easy way.
I think it can be done by:
1-Detecting the mouse position.
2-Looping through the controls of the form and if the mouse position falls in the bounds of the control then the mouse is on that control.
But this is a little time consuming and not desireable esp in a very populated form. Any better idea?

[Cander]

write a mousehover event and wire up the mousehover event of all controls to it. sender parameter will be the control that the mouse is over.

 

    Private Sub MouseHover1(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseHover, Label1.MouseHover
        MessageBox.Show(sender.Name)
    End Sub

[Cander]

Excuse me. MouseEnter might be better than MouseHover

[Lunatic3]

Thanks Cander
I was thinking to make it more dynamic, and that was looping through all controls at form_load event and addhandler for their Mouse_Enter event. What you think about that?

[Cander]

i was actually looking into that. I m tryin to create a loop that goes through each control on the form then adds the handler to it. Sorta like this

Dim a As Object
 
        For Each a In Me.Controls
            If a.GetType.ToString() <> "Form" Then
                   AddHandler CType(a, a.GetType).MouseEnter, AddressOf MouseHover1
            End If
        Next

Problem is, it wont accept the a.GeType from within the CType function

[Cander]

if nothing else, you could Select Case the a.GetType.ToString for things like Button, Label, etc. and just do a CType(a, Button).MouseEnter for Button, same for label, etc.

[Lunatic3]

and why excluded 'Form'?

[Cander]

I didnt want it to Messagebox everytime i moved the mouse. No other reason

[Cander]

oh boy..I figured it out

For Each a In Me.Controls
                AddHandler CType(a, Control).MouseEnter, AddressOf MouseHover1
        Next

[Lunatic3]

I didnt want it to Messagebox everytime i moved the mouse. No other reason

I need to send the control which is under the mouse to another event and that inclueds the 'Form' itslef. By the way the form itself is not included in its control collections. So I should write the event for the form that hanles MyBase.MouseEnter and address all of other controls to that event.

[Cander]

Well since form is just 1 object, I see no reason why shouldnt just straight code in the Forms MouseWhatever event. And use the wired up event for all other controls.

[Lunatic3]

Thats just what i meant, write the event for form and
AddHandler CType(a, Control).MouseEnter, AddressOf Form1_MouseEnter