Evento click derecho del mouse
Fernando
14 de Abril del 2003
Hola
Alguien puede decirme como se intercepta el evento de dar click sobre el boton derecho del mouse en general(sobre formularios, MSFlexGrids, botones, pero sobre todo me interesa saber sobre MSFlexGrid y formularios)
De antemano muchas gracias.
Atte. Fdo. Fdez.
Alguien puede decirme como se intercepta el evento de dar click sobre el boton derecho del mouse en general(sobre formularios, MSFlexGrids, botones, pero sobre todo me interesa saber sobre MSFlexGrid y formularios)
De antemano muchas gracias.
Atte. Fdo. Fdez.
margompe
14 de Abril del 2003
Para distinguir entre los botones primario, secundario y central del mouse, utilice los eventos MouseDown y MouseUp.
continuacion
14 de Abril del 2003
El argumento button se usa con MouseDown para determinar qu茅 bot贸n est谩 presionado y con MouseUp para determinar qu茅 bot贸n se ha soltado. Como en cada evento s贸lo un bit tiene valor, no puede comprobar si se est谩n usando dos o m谩s botones a la vez. Es decir, los eventos MouseDown y MouseUp s贸lo reconocen la presi贸n de un bot贸n cada vez.
Nota Por otro lado, puede usar el evento MouseMove para comprobar si hay dos o m谩s botones presionados simult谩neamente. Tambi茅n puede usar MouseMove para comprobar qu茅 bot贸n en concreto est谩 presionado, independientemente de si hay o no otro bot贸n presionado a la vez. Para obtener m谩s informaci贸n al respecto, consulte 聯Uso de Button con MouseMove聰, m谩s adelante en este mismo tema.
Puede especificar qu茅 bot贸n ha causado el evento MouseDown o MouseUp mediante c贸digo sencillo. El siguiente procedimiento comprueba si button es igual a 1, 2 贸 4:
Private Sub Form_MouseDown (Button As Integer, _
Shift As Integer, X As Single, Y As Single)
If Button = 1 Then Print "Presion贸 _
el bot贸n primario."
If Button = 2 Then Print "Presion贸 _
el bot贸n secundario."
If Button = 4 Then Print "Presion贸 _
el bot贸n central."
End Sub
Si se presiona m谩s de un bot贸n, Visual Basic interpreta la acci贸n como dos o m谩s eventos MouseDown distintos. Establece el bit para el primer bot贸n presionado, muestra el mensaje para ese bot贸n y, a continuaci贸n, hace lo mismo para el siguiente bot贸n. Igualmente, Visual Basic interpreta como eventos MouseUp distintos el hecho de que se suelten dos o m谩s botones.
Nota Por otro lado, puede usar el evento MouseMove para comprobar si hay dos o m谩s botones presionados simult谩neamente. Tambi茅n puede usar MouseMove para comprobar qu茅 bot贸n en concreto est谩 presionado, independientemente de si hay o no otro bot贸n presionado a la vez. Para obtener m谩s informaci贸n al respecto, consulte 聯Uso de Button con MouseMove聰, m谩s adelante en este mismo tema.
Puede especificar qu茅 bot贸n ha causado el evento MouseDown o MouseUp mediante c贸digo sencillo. El siguiente procedimiento comprueba si button es igual a 1, 2 贸 4:
Private Sub Form_MouseDown (Button As Integer, _
Shift As Integer, X As Single, Y As Single)
If Button = 1 Then Print "Presion贸 _
el bot贸n primario."
If Button = 2 Then Print "Presion贸 _
el bot贸n secundario."
If Button = 4 Then Print "Presion贸 _
el bot贸n central."
End Sub
Si se presiona m谩s de un bot贸n, Visual Basic interpreta la acci贸n como dos o m谩s eventos MouseDown distintos. Establece el bit para el primer bot贸n presionado, muestra el mensaje para ese bot贸n y, a continuaci贸n, hace lo mismo para el siguiente bot贸n. Igualmente, Visual Basic interpreta como eventos MouseUp distintos el hecho de que se suelten dos o m谩s botones.
margompe
14 de Abril del 2003
Si necesita comprobar los argumentos bot贸n o may煤s, puede utilizar las constantes enumeradas en la biblioteca de objetos del Examinador de objetos de Visual Basic (VB) para definir los bits dentro del argumento:
Constante (Bot贸n) Valor Descripci贸n
vbLeftButton 1 Est谩 presionado el bot贸n primario.
vbRightButton 2 Est谩 presionado el bot贸n secundario.
vbMiddleButton 4 Est谩 presionado el bot贸n
Constante (Bot贸n) Valor Descripci贸n
vbLeftButton 1 Est谩 presionado el bot贸n primario.
vbRightButton 2 Est谩 presionado el bot贸n secundario.
vbMiddleButton 4 Est谩 presionado el bot贸n