المشاركات : 421
المواضيع 77
:
: 195
الإنتساب : Dec 2008
السلام عليكم
هل من الممكن الجمع بين العمله والعدد الطبيعي
لقد قمت بالربط بين قاعده بيانات الأكسس والدلفي وكما هو مبين في الصوره فهناك حقول من نوع رقمي والأخرى عمله فأردت ضرب العمله في العدد الصحيح لإظهار المجموع كيف يتم ذلك
أم أجعل كل الحقول رقمي وفي الفورم في الدلفي أحولها على شكل عمله
هل هناك من طريقى مثلى لحل هذه المشكله كيف يثم كتابه الكود وماذا أفعل في الفورم :confused:
المشاركات : 421
المواضيع 77
:
: 195
الإنتساب : Dec 2008
نفرض أنا edit1 هو حقل المجموع
و dbEdit2 هو حقل الكميه رقمي في قاعده البيانات
وdbEDIT3 هو حقل السعر والمشكل أنه عملة كيف نقوم بالحساب بين العمله والرقم
او نقوم بتغييرها في قاعده البينات إلى رقم حتى هي!!
Edit1.Text := floattostr(strtofloat(DBEdit3.text) * strtoint(DBEdit2.Text)) ;
البرنامج يعمل ولا يقوم بالحساب في حقل المجموع من نوع TEDIT لماذا؟
المشاركات : 9
المواضيع 1
:
: 0
الإنتساب : Mar 2012
واجهتني نفس المشكلة و لم أتوصل إلى حل مع العلم أنني أعلم بأن المشكلة تكمن في أن الصيغ لكل من الحقلين ليس لهما نفس النوع.
المشاركات : 119
المواضيع 0
:
: 0
الإنتساب : Sep 2012
السلام عليكم...
بالطبع يمكن إجراء العمليات الحسابية (جمع و طرح و ضرب ... إلخ) بين القيم العددية ذات الأنواع المختلفة بصرف النظر عن نوعها (Integer, Real, Currency,...) و لا داعي لتغيير أنواع الحقول. مثلاً يمكنك ضرب الكمية (رقم حقيقي) بالسعر (عملة) للحصول على الإجمالي.
لا أدري ما المقصود بأن الكود لا يعمل: هل يعطي خطأ أم أنه لا يظهر ناتج في المربع Edit1 ؟ و أين يوجد هذا الكود (في أي حدث مثلاً) ؟
جرب أن تضع Break Point على هذا السطر ثم تفحص قيم DBEdit2 و DBEdit3 لتتأكد من أن الخاصية Text لهما تعطي القيمة التي تتوقعها.
سلام.
المشاركات : 421
المواضيع 77
:
: 195
الإنتساب : Dec 2008
لقد وجدت المساعـده في منتدى آخر
وهو كتابه الكود في ADOTABLE وليس في كود textEDIT3 لتظهر النتيجه في السعر الإجمالي وهو textEDIT3