ساده ترین کار اینه که تو* Event* Key Press*اینو قرار بدهید.*
کد:
کد:*if (Key IN ["0".."9"]) then key:= #0;
ضمنا بهتره که در مورد این تابع هم* تحقیقاتی بکنید. SetWindowLong
خیلی از کارها رو میشه باهاش انجام داد.
مثلا قطعه کد زیر یکعدد TextBox رو محدود به*ورود اعداد میکنه*
کد:
کد:SetWindowLong(Edit1.Handle , GWL_STYLE, GetWindowLong(Edit1.Handle,GWL_STYLE) or * ES_NUMBER );
ضمنا اون رو باید در*Event Form Create قرار بدهید...
*
علاقه مندي ها (Bookmarks)