{"id":55000282,"date":"2021-08-01T00:00:00","date_gmt":"2021-12-31T14:21:27","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=282"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Markierung_bei_Fokuserhalt_der_TextBox","status":"publish","type":"post","link":"https:\/\/vbentwickler.de\/Markierung_bei_Fokuserhalt_der_TextBox\/","title":{"rendered":"Markierung bei Fokuserhalt der TextBox"},"content":{"rendered":"

Im Artikel “Das TextBox-Steuerelement” haben wir die Grundlagen zum TextBox-Steuerelement beschrieben. Dort haben wir noch längst nicht alle Möglichkeiten behandelt, die es bei der Programmierung von TextBox-Steuerelementen unter WPF gibt. Im vorliegenden Artikel schauen wir uns an, wie Sie das Verhalten einer TextBox beim Fokuserhalt steuern können, genau genommen: Wie erreiche ich, dass die Einfügemarke an einer bestimmten Stelle positioniert wird beziehungsweise der komplette Inhalt markiert wird Und das nicht nur für den Fokuserhalt durch die Tabulator- oder Eingabetaste, sondern auch beim Anklicken mit der Maustaste.<\/b><\/p>\n

Einfügemarke beim Fokuserhalt an bestimmter Position platzieren<\/h2>\n

Die folgenden Definitionen von TextBox<\/b>-Elementen sollen die Einfügemarke an verschiedenen Positionen platzieren, wenn das Element den Fokus erhält. Das erste Element soll die Einfügemarke am Start des Textes platzieren. Dazu nutzen wir das Ereignis GotFocus<\/b>:<\/p>\n

<Label>Einfügemarke vorn:<\/Label>\r\n<TextBox x:Name=\"txtCursorStart\" GotFocus=\"txtCursorStart_GotFocus\">Dies ist ein Beispieltext.<\/TextBox><\/pre>\n
Dafür hinterlegen wir die folgende Ereignismethode:<\/p>\n
Private Sub <\/span>txtCursorStart_GotFocus(sender As Object<\/span>, e As <\/span>RoutedEventArgs)\r\n     txtCursorStart.Select(0, 0)\r\nEnd Sub<\/span><\/pre>\n
Diese verwendet die Select<\/b>-Methode, um mit dem ersten Parameter die Startposition und mit der zweiten die Länge der Markierung festzulegen. Der Wert 0 <\/b>für den ersten Parameter fügt die Einfügemarke ganz vorn ein und der Wert 0 <\/b>für den zweiten Parameter sorgt dafür, dass die Einfügemarke nicht zu einer Markierung wird.<\/p>\n
Für die Anzeige der Einfügemarke ganz hinten im Textfeld fügen wir ein weiteres Textfeld hinzu. Für dieses definieren wir das gleiche Ereignis:<\/p>\n
<Label >Einfügemarke hinten:<\/Label>\r\n<TextBox x:Name=\"txtCursorEnd\" GotFocus=\"txtCursorEnd_GotFocus\">Dies ist ein Beispieltext.<\/TextBox><\/pre>\n
Die Methode, die durch dieses Ereignis ausgelöst wird, ermittelt für den ersten Parameter der Select<\/b>-Methode jedoch mit der Length<\/b>-Eigenschaft die Länge des im TextBox<\/b>-Element enthaltenen und mit der Eigenschaft Text <\/b>gelieferten Text. Der zweite Parameter hat wie im ersten Beispiel den Wert 0<\/b>:<\/p>\n
Private Sub <\/span>txtCursorEnd_GotFocus(sender As Object<\/span>, e As <\/span>RoutedEventArgs)\r\n     txtCursorEnd.Select(txtCursorEnd.Text.Length, 0)\r\nEnd Sub<\/span><\/pre>\n
Im dritten Textfeld wollen wir den vollständigen Text markieren, wenn das Textfeld den Fokus erhält:<\/p>\n
<Label>Alles markieren:<\/Label>\r\n<TextBox x:Name=\"txtCursorAll\" GotFocus=\"txtCursorAll_GotFocus\">Dies ist ein Beispieltext.<\/TextBox><\/pre>\n
Wir könnten auch hier die Select<\/b>-Methode verwenden und als Startposition der Markierung den Wert 0 <\/b>und als Endposition die Länge des zu markierenden Textes übergeben. Eleganter ist in diesem Fall jedoch der Einsatz der SelectAll<\/b>-Methode:<\/p>\n
Private Sub <\/span>txtCursorAll_GotFocus(sender As Object<\/span>, e As <\/span>RoutedEventArgs)\r\n     txtCursorAll.SelectAll()\r\nEnd Sub<\/span><\/pre>\n
All diese Möglichkeiten funktionieren gut, wenn der Benutzer den Fokus mit der Tabulator-Taste oder mit der Eingabe-Taste verschiebt (siehe Bild 1).<\/p>\n
\"Markieren<\/p>\n
Bild 1: Markieren von Text<\/span><\/b><\/p>\n
Sobald er jedoch mit der Maus in eines der Textfelder klickt, erscheint die Einfügemarke genau an der Stelle des Mausklicks. Beim Anklicken der dritten Schaltfläche, die den ganzen Text markieren sollte, blinkt sogar kurz die vollständige Markierung auf, bevor die Einfügemarke an der Mausposition erscheint.<\/p>\n
In manchen Fällen wünschen wir uns jedoch auch beim Anklicken eines TextBox<\/b>-Elements mit der Maus, dass dieses komplett markiert wird. Für diesen Fall müssen wir uns also eine alternative Möglichkeit einfallen lassen. Aber benötigen wir ein anderes Ereignis Nein, wir ändern lediglich den Code des Ereignisses:<\/p>\n
Private Sub <\/span>txtCursorAll_GotFocus(sender As Object<\/span>, e As <\/span>RoutedEventArgs)\r\n     Dim <\/span>txt As <\/span>TextBox\r\n     txt = sender\r\n     txt.Dispatcher.BeginInvoke(New<\/span> Action(Sub() txt.SelectAll()))\r\nEnd Sub<\/span><\/pre>\n
Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Visual Basic Entwickler<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 200 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t
\n\n\t\t\n\t\t