Only numbers in input check

[Info]

I need something like this:

Case $msg = $Button

If GUICtrlRead($Input) = At Least One Letter Then

MsgBox(16,"Error","Only Numbers Allowed")

EndIf

Thanks

[Generator]

By MrCreatoR

[tryer777]

#include <EditConstants.au3>

$Input = GUICtrlCreateInput("",$X,$Y,$W,$H,BitOr($GUI_SS_DEFAULT_INPUT,$ES_NUMBER))

Edited May 11, 2008 by tryer777

[Generator]

#include <EditConstants.au3>

$Input = GUICtrlCreateInput("",$X,$Y,$W,$H,BitOr($GUI_SS_DEFAULT_INPUT,$ES_NUMBER))

The above UDF by MrCreatoR can prevent all non-number input in many forms such as Ctrl+C.

[ProgAndy]

Only 0-9 (e.g. 35) Or only 0-9 and dot (eg 73.9)?

a) Use $ES_NUMBER syle doesn't work, so use the UDF from above:) e.g. you can paste with CTRL-V

0-9 and dot:

$str = InputBox("kh","Inout Number")
MsgBox(0, '', StringIsFloat($str) Or StringIsInt($str))

Edited May 11, 2008 by ProgAndy