ایجاد یک Edit که فقط عدد دریافت کند

SetWindowLong(Edit1.Handle, GWL_STYLE, ES_NUMBER);