محدود کردن تکست باکس به اعداد

[admin]

برای محدود کردن یک تکست باکس به اعداد از کد زیر استفاده می شود ، ضمنا این کد برای تمامی*آبجکت های*همسان هم کاربرد دارد ...

کد:

SetWindowLong(Edit1.Handle,GWL_STYLE,GetWindowLong(Edit1.Handle,GWL_STYLE)or ES_NUMBER);

کد بالا بایستی در رویداد FormCreate* درج گردد.