Spoiler anzeigen
#include "InputFilter.au3"
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 615, 437, 192, 124)
$Input1 = GUICtrlCreateInput("", 96, 80, 209, 21)
GUICtrlInputSetFilter(-1, "InputFilter")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func InputFilter($sChr, $sStr)
If StringRegExp($sStr,"^.") Then Return $INPUTFILTER_ALLOW
If StringInStr(@CRLF, $sChr) Then Return $INPUTFILTER_SILENTDENY
Return $INPUTFILTER_DENY
EndFunc ;==>InputFilter
Moin,
könnt ihr mir helfen?
ich versuche in einer Inputbox einen Punkt zu filtern. Also eine Punkteingabe ist nicht zulässig
Gruß