[VB] onderscheid rechtermuisknop

[Verwijderd]

Beste gasjes,
Ik wil een button 2 verschillende functies geven, 1 linker muisknop en 1 rechter muisknop. Weet iemand hoe ik dat moet maken?

Eddie

[Verwijderd]

K, stel ik heb dit, hoe kan ik dan herkennen of ik links of rechts heb gedrukt:

Private Sub Command1_Click()

End Sub

[Pc123]

MouseUp event:

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

End Sub

Button = 1 bij links
Button = 2 bij rechts

sim-pel

[Verwijderd]

Dus Button As Integer wordt Button = 1, bedankt

[Pc123]

If Button = 1 then goto LeftClick
If Button = 2 then goto RightClick

MouseUp is beter dan MouseDown btw, want je normaal gesproken pakt ie de klik pas als je je muis los laat.

[3volution]

Dat kan daar niet, je moet gebruik maken van de MouseUp:

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

If Button = vbRightButton Then
...
End If

End Sub

[Verwijderd]

Werkt niet, als ik Button As Integer vervang door Button = 1 krijg ik een of andere list seperator fout.

[Verwijderd]

Bedankt!

[roelio]

ja logisch die foutmelding
je moet ook niet button op 1 zetten
maar testen OF button 1 is !

[Exterazzo]

maar in een textbox geeft ie toch altijd een contextmenutje weer? behalve als je een popup hebt gedefineerd dan geeftie ze om de buurt aan!

of zit ik nu verkeerd?

[Exterazzo]

maar in een textbox geeft ie toch altijd een contextmenutje weer? behalve als je een popup hebt gedefineerd dan geeftie ze om de buurt aan!

of zit ik nu verkeerd?

[Crazy D]

Klopt, maar om dat contectmenu van een textbox weg te halen moet je gaan subclassen....

[Pc123]

Dat klopt ja, maar wat subclassing voorbeeldjes kun je overal vinden.

[Mr. B.]

Op dinsdag 02 oktober 2001 21:18 schreef Pc123 het volgende:


If Button = 1 then goto LeftClick
If Button = 2 then goto RightClick

MouseUp is beter dan MouseDown btw, want je normaal gesproken pakt ie de klik pas als je je muis los laat.

GoTo's? Bah

Op woensdag 03 oktober 2001 14:09 schreef CrazyD_at_work het volgende:
Klopt, maar om dat contectmenu van een textbox weg te halen moet je gaan subclassen....

Op MSDN is geloof ik ook nog een smerig trucje te vinden waarmee het zonder subclassen kan, maar als je het goed wil doen moet je in een subclass idd gewoon ff WM_CONTEXTMENU afvangen