EnableExplicit

Define String$

String$="Test-String"
MessageRequester("","Anzahl der Zeichen: "+Str(lstrlen_(String$)),0)