German EditText beim antippen alles selektieren

Discussion in 'German Forum' started by so27, Apr 22, 2015.

  1. so27

    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
    Code:
    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
     
  2. pjo12345

    pjo12345 Active Member Licensed User

    Da musst du abfragen, ob EditText1 den Focus hat.
     
  3. so27

    so27 Active Member Licensed User

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

    so27 Active Member Licensed User

    Mit dem Code kann ich den Focus abfragen, aber wo muss ich den wohl einsetzen?

    Code:
    If EditText1.RequestFocus= True Then EditText1.SelectAll
     
  5. pjo12345

    pjo12345 Active Member Licensed User

    Ungefähr so.
    Code:
    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
  6. so27

    so27 Active Member Licensed User

    Nee, das haut leider noch nicht ganz hin.
     
  7. pjo12345

    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.
     
  8. so27

    so27 Active Member Licensed User

    Ja, danke jetzt passt es. :confused::)
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice