RichTextBox - bei Rechtsklick Cursor setzen Standardmäßig wird der Cursor im RichTextBox-Control nur beim Linksklick auf die entsprechende Textstelle gesetzt. Hier zeigen wir eine Möglichkeit, wie man den Cursor auch beim Rechtsklick entsprechend setzen kann.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  376
www.tools4vb.de	System:  Win9x, WinNT, Win2000, WinXP, Vista	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 11 Bewertung insgesamt: sehr gut Durchschnittliche Bewertung: 5.0 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Bei Verwendung des RichTextBox-Controls wird der Cursor standardmäßig nur beim Linksklick auf die entsprechende Textstelle positioniert. Beim Rechtsklick hingegen bleibt der Eingabecursor an der aktuellen Einfügemarke stehen. Manchmal will man aber, dass der Eingabecursor auch beim Rechtsklick entsprechend gesetzt wird.

Nachfolgend eine Möglichkeit, wie sich das Ganze durch "Siumlieren" eines Linksklicks realisieren lässt:

Private Sub RichTextBox1_MouseUp(Button As Integer, Shift As Integer, _
  x As Single, y As Single)
 
  If Button = vbRightButton Then
    ' Links-Klick simulieren
    SendMausklick MOUSE_LEFT
  End If
End Sub

Den benötigten Code zur Funktion "SendMausklick" finden Sie hier:
 Mausklick simulieren