German EditText beim antippen alles selektieren

so27

Active Member

Licensed User

Longtime User

• Apr 22, 2015

• #1

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

Longtime User

• Apr 22, 2015

• #2

Da musst du abfragen, ob EditText1 den Focus hat.

 

so27

Active Member

Licensed User

Longtime User

• Apr 22, 2015

• #3

Okay, und wo genau stelle ich die Abfrage? In welcher Sub?

 

so27

Active Member

Licensed User

Longtime User

• Apr 22, 2015

• #4

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

Longtime User

• Apr 22, 2015

• #5

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: Apr 22, 2015

so27

Active Member

Licensed User

Longtime User

• Apr 22, 2015

• #6

Nee, das haut leider noch nicht ganz hin.

 

pjo12345

Active Member

Licensed User

Longtime User

• Apr 22, 2015

• #7

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.

 

so27

Active Member

Licensed User

Longtime User

• Apr 22, 2015

• #8

Ja, danke jetzt passt es.