السلام عليكم :
اذا كان لدي العناصر التالية : edit1,edit2,edit3
وكانت الشيفرة التالية : في الحدث : edit2 onchange كتبت ما يلي :
; ( a:=strtofloat (edit2.text
; (b:=strtofloat (edit3.text
c:=a*b
;(edit1.text:=floattostr(c
و نفس الشيفرة كتبتها في الحدث :edit3 onchange
مع العلم اني مسحت text للـ edit
عند كتابة رقم في edit2 ثم رقم ثاني في edit3 يظهر مباشرة الناتج في edit1 ولكن المشكلة:
تظهر لي رسالة خطأ عند كتابة رقم في الـ edit3
أرجو من الأخوة مساعدتي و لكم جزيل الشكر ...
اخي العزيز في المرة القادمة احقل العنوان دالا على المحتوى
اسمع هل يحدث هذا الخطا عند مسح الرقم من edit3 ؟
اذا كان الامر
عموما انسخ الكو د الى هنا لنراه سويا
او ارسل ملف البرنامج
تم تعديل هذه المشاركة بواسطة romanof في 18 أكتوبر 2005 في 02:54
أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر
وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري
كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو
أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري
عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري
فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري
السلام عليكم
يحدث الخطأ عند كتابة رقم في edit3 قبل كتابته في الـ edit2
السلام عليكم
if edit2.txt <> '' then a:=strtofloat (edit2.text); if edit3.txt <> '' then b:=strtofloat (edit3.text); c:=a*b; edit1.text:=floattostr(c);
السلام عليكم :
شكرا كتير اخي الكريم ابو محمد ..
او يمكنك استخدام ما يلي
a:=strtofloatDef (edit2.text,0); b:=strtofloatDef (edit3.text,0); c:=a*b; edit1.text:=floattostr(c);
لكي يرجع لك القيمة التي تضعها بعد الفاصلة عند حدوث اي خطأ
رب اجعلني مقيم الصلاة ومن ذريتي ربنا وتقبل دعاء.
لا تنسى: "العقل مثل العضلة كلما استخدمته أكثر كلما ازدادت قوته"
هذا الموضوع مغلق.