German EditText beim antippen alles selektieren

so27

Active Member
Licensed User
Hallo zusammen,

ich möchte, dass wenn eine Edittext-Box von meinem Anwender angetippt wird und sich die Tastatur aufklappt, gleich der schon im Feld stehende Text markiert wird.

Mit
B4X:
EditText1.SelectAll
markiere ich den Inhalt. Das ist klar, aber wie stelle ich es an, dass der Text beim Antippen des Textfeldes direkt markiert wird?

LG, so27
 

pjo12345

Active Member
Licensed User
Da musst du abfragen, ob EditText1 den Focus hat.
 

so27

Active Member
Licensed User
Okay, und wo genau stelle ich die Abfrage? In welcher Sub?
 

so27

Active Member
Licensed User
Mit dem Code kann ich den Focus abfragen, aber wo muss ich den wohl einsetzen?

B4X:
If EditText1.RequestFocus= True Then EditText1.SelectAll
 

pjo12345

Active Member
Licensed User
Ungefähr so.
B4X:
Sub EditText1_FocusChanged(Hasfocus As Boolean)
  If Hasfocus = True Then
    EditText1.SelectAll
  End if
End sub
Ungetestet. Probiere es mal.
 
Last edited:

pjo12345

Active Member
Licensed User
Du musst die ganze Sub in deinen Code einfügen. Und wenn dein EditText1 den Focus erhält oder verliert dann wird diese Sub ausgeführt. Nun musst du nur abfragen, ob dein EditText1 den Focus bekommt oder verliert. Und das macht der Code innerhalb der Sub.
 
Top