BOTAO DIREITO NO FLEXGRID

DANLEONHART 10/05/2011 20:38:41
#373613
Gente...
Se clico com o botão esquerdo do Mouse em uma célula do FlexGrid, ele já seleciona de primeira...agora, como faço para que ocorra o mesmo se clicar com o botão direito do Mouse ?

Deve ser simples né...mas estou impancado nisso
XXXANGELSXXX 10/05/2011 21:55:43
#373617
Private Sub SeuGrid_MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single)
If Button = 2 Then
Seu evento aqui
End If
End Sub
MARCELO.TREZE 10/05/2011 22:09:37
#373621 Resposta escolhida
assim

Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
With MSFlexGrid1
.Row = .MouseRow
.Col = .MouseCol
End With
End Sub
DANLEONHART 10/05/2011 22:43:48
#373626
Valeu Marcelo !

Funcionou beleza !
Tópico encerrado , respostas não são mais permitidas
Voltar