|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Mouse/Teclado)
|
|
 |
Título da Dica: Exibindo menus com o botão direito do mouse
|
 |
|
|
|
Postada em 5/4/2006 por Dançarino
EXIBINDO MENUS COM O BOTÃO DIREITO DO MOUSE
A exibição de menus quando o botão direito do mouse é clicado passou a ser muito utilizada no Windows 95. Essa é uma função muito simples de ser implementada no seu programa, basta utilizar o método PopupMenu.
Crie normalmente o menu e defina-o como visível ou invisível, dependendo da necessidade. O método PopupMenu o exibirá independentemente do status da sua propriedade Visible. Escolha o objeto que permitirá ao usuário o uso do botão direito e insira as linhas de código conforme o exemplo descrito abaixo:
Private Sub ListView1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
PopupMenu mnuEdit
End If
End Sub
No exemplo, o código foi adicionado ao evento MouseUp do objeto ListView1e será executado somente após o usuário soltar o botão do mouse. Na linha de comando que compara o parâmetro Button, o valor da constante vbRightButton é 2, que representa o botão direito.
AOutros valores desse parâmetro com seus respectivos significados:
Situação Nome da Constante Valor da Constante
Botão esquerdo foi pressionado VbLeftButton 1
Botão direito foi pressionado VbrightButton 2
Botão do centro foi pressionado VbmiddleButton 4
|
|
|
|
|
