How to caputre Mouse single and Double click evennts

[Sakharam Phapale]

Hi All,

How to capture Mouse Single click and mouse double click event on Commnad
Button.
I am doing as follows.

Private Sub Button1_MouseUp(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Button1.MouseUp

If e.Clicks = 1 Then

MsgBox("1")

Else

MsgBox("2")

End If

End Sub
But each time I gets single click.
Even after clicking mouse button twice, events gets fired on first click and
I am not been able to capture double click event.

Any suggestions will be appreciated.

Thanks in advance
Sakharam Phapale

[jo0ls]

"Sakharam Phapale" <sp******@annetsite.com> wrote in
news:#V**************@TK2MSFTNGP12.phx.gbl:

Hi All,

How to capture Mouse Single click and mouse double click event on
Commnad Button.
I am doing as follows.

Private Sub Button1_MouseUp(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Button1.MouseUp

If e.Clicks = 1 Then

MsgBox("1")

Else

MsgBox("2")

End If

End Sub
But each time I gets single click.
Even after clicking mouse button twice, events gets fired on first
click and I am not been able to capture double click event.

Any suggestions will be appreciated.

Thanks in advance
Sakharam Phapale

Don't use button.mouseup, there are existing events for this:
button.click
button.doubleclick

[Herfried K. Wagner [MVP]]

"Sakharam Phapale" <sp******@annetsite.com> schrieb:

How to capture Mouse Single click and mouse double click event on Commnad
Button.

How should Windows know at time n that the user will make a click at time n
+ 1? This problem can be solved, although the solution might irritate the
user because single clicks will be processed with a lag. You can do that by
storing the time when the first click occured and then check the time
differene between the first and the 2nd click.
'SystemInformation.DoubleClickTime' will give you the system's double click
time. If it's possible I would try to avoid to assign different operations
to a control's 'Click' and 'DoubleClick' events.

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

[whoopding]

Use Button1_Click and Button1_DoubleClick events procedures

"Sakharam Phapale" <sp******@annetsite.com> wrote in message
news:%2****************@TK2MSFTNGP12.phx.gbl...

Hi All,

How to capture Mouse Single click and mouse double click event on Commnad
Button.
I am doing as follows.

Private Sub Button1_MouseUp(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Button1.MouseUp

If e.Clicks = 1 Then

MsgBox("1")

Else

MsgBox("2")

End If

End Sub
But each time I gets single click.
Even after clicking mouse button twice, events gets fired on first click
and
I am not been able to capture double click event.

Any suggestions will be appreciated.

Thanks in advance
Sakharam Phapale

[Herfried K. Wagner [MVP]]

"whoopding" <[e-mail]> schrieb:

Use Button1_Click and Button1_DoubleClick events procedures

Still, for every 'DoubleClick' event a 'Click' event is fired too.

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

[jo0ls]

"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in
news:eo**************@TK2MSFTNGP12.phx.gbl:

"whoopding" <[e-mail]> schrieb:

Use Button1_Click and Button1_DoubleClick events procedures

Still, for every 'DoubleClick' event a 'Click' event is fired too.

hmm doubleclick never fires anyway:

"This member supports the .NET Framework infrastructure and is not intended
to be used directly from your code."

[jo0ls]

jo0ls <sp**@example.invalid> wrote in news:EvLOd.11291$8B3.8157
@text.news.blueyonder.co.uk:

"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in
news:eo**************@TK2MSFTNGP12.phx.gbl:

"whoopding" <[e-mail]> schrieb:

Use Button1_Click and Button1_DoubleClick events procedures
Still, for every 'DoubleClick' event a 'Click' event is fired too.

hmm doubleclick never fires anyway:

"This member supports the .NET Framework infrastructure and is not

intended to be used directly from your code."

so a custom button to capture clicks:

Private Class dblClickButton
Inherits System.Windows.Forms.Button
Public noOfClicks As Integer = 0
Public ReadOnly Property [Clicks]() As Integer
Get
Return noOfClicks
End Get
End Property

Protected Overrides Sub WndProc(ByRef m As Message)
If m.Msg = &H201 Then noOfClicks = 1
If m.Msg = &H203 Then noOfClicks = 2
MyBase.WndProc(m)
End Sub
End Class

Those hex values used to be listed in the winuser.h file in the sdk but
have dissapeared.
&H201 occurs when it's a single click
&H203 occurs when it's a double clik
we still want them processed so feed them back with mybase.wndproc(m)

With the new base button you can catch the single and double clicks:

Dim WithEvents btn1 As New dblClickButton

Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles MyBase.Load
btn1.Location = New System.Drawing.Point(150, 100)
Me.Controls.Add(btn1)
btn1.Text = "click me"

End Sub
Private Sub btn1_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles btn1.Click
Me.Label1.Text = Me.btn1.Clicks
End Sub
BUT, it will still catch a single click just before each double click
fires, but at least it does know if a double click occured.