Problema con PupupMenu...
Hola, mi problema es el siguiente:
Utilizo este procedimiento para, cuando hago clic con el botón derecho del mouse me sepliegue un menu.
Private Sub Grid_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
PopupMenu mRep, , X, Y
End If
End Sub
El problema que tengo es que cuando hago clic sobre la grilla con el botón derecho, el menu aparece en cualquier lado del formulario y no al lado del puntero del mouse.
¿Cómo tengo que hacer?
Espero hayas entendido la pregunta.
Desde ya Gracias!
Utilizo este procedimiento para, cuando hago clic con el botón derecho del mouse me sepliegue un menu.
Private Sub Grid_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
PopupMenu mRep, , X, Y
End If
End Sub
El problema que tengo es que cuando hago clic sobre la grilla con el botón derecho, el menu aparece en cualquier lado del formulario y no al lado del puntero del mouse.
¿Cómo tengo que hacer?
Espero hayas entendido la pregunta.
Desde ya Gracias!
1 respuesta
Respuesta de adrianxxi
1