Private Sub LviewClientes_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)


Handler Menu de Contexto da Lview

If Button = vbRightButton Then

Set Item = LviewClientes.HitTest(X, Y)


PopupMenu MnuPopUpListagem

End If


End Sub

This is a way to activate the right popupmenu!