Frage zu GetGadgetText

[Fanpost]

Moin,

Frage: Können bei der Eingabe sofort die eingegebenen Zeichen auf Anzahl geprüft werden?
Ich glaube ich gehe nun doch in Rente

[RSBasic]

Meinst du so?:

Code: Alles auswählen

EnableExplicit

If OpenWindow(0, 0, 0, 200, 100, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  StringGadget(1, 10, 10, 100, 20, "", 0)
  
  If CreateStatusBar(1, WindowID(0))
    AddStatusBarField(#PB_Ignore)
  EndIf
  
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_Gadget
        Select EventGadget()
          Case 1
            StatusBarText(1, 0, Str(Len(GetGadgetText(1))) + " Zeichen")
        EndSelect
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf

[Fanpost]

@RSBasic
Danke für die Zeilen, genauso meinte ich es. Danke!