دريافت رشته اعشاري وتبديل رشته به عدد اعشاري و برعكس :

[bmanfy]

سلام دوستان :
براي دريافت فقط عدد اعشاري در يك جعبه متن از چه روشي استفاده مي كنيد ؟
من خودم KeyPress رو بررسي ميكنم كه اعداد و علامت نقطه رو داشته باشه اما خوب يك اينجوري طرف ميتونه چنت نقطهرو وارد كنه . (اولين راهي كه به ذهنم رسيد اينه كه رشته رو جستجو كنه اگه نقطه نبود و.... كه البته اين زياد جالب به نظرم نرسيد . راه بهتري هست ؟
حالا ميخوام اين رشته رو تبديل به عدد اعشاري كنم . خوب تابع StrToFloat هست .اما خوب اگر كاركتر نا معتبر تو رشته باشه خطا ميده كه خوشايند نيست .(استثنا EconvertError) . ولااقل طوري هم نيست كا تا جايي كه خطا رخ داده رو برگردونه و صفر رو بر ميگردونه .
منظور من چيزي مقل تابع Val هستش . كه تا محل وقوع رو بر ميگردونه ، محل خطا رو بر مبگردونه اصلا استثنا رخ نميده براش و ...

[Felony]

از کامپوننت MaskEdit استفاده کن ، تبدیل و ... هم نیازی نیست .

[hadisalahi2]

از کامپوننت TMS AdvEdit اگه استفاده کنی ، خودش همه این تنظیمات رو داره.
روش اول که خودت گفتی خیلی خوبه ، حالا بیا توی همون KeyPress بررسی کن اگه یکدونه نقطه قبلا وارد شده ، دوباره به کاربر اجازه نده نقطه بعدی رو وارد کنه.
و در مورد استثنا هم که میتونی خودت در قسمت Except مقدار صفر رو برگردونی.
درکل روشهایی که گفتی همش درسته ، فقط یک کم باید اصلاحش کنی.
یا حق