delphi4arab منتديات دلفي للعرب
كيفه أقوم بجمع حقلين مختلفين في القيمه؟ - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفه أقوم بجمع حقلين مختلفين في القيمه؟ (/showthread.php?tid=6406)



كيفه أقوم بجمع حقلين مختلفين في القيمه؟ - ALG2009 - 26-08-2014

السلام عليكم

هل من الممكن الجمع بين العمله والعدد الطبيعي

[صورة: Uuv4QO.jpg]

لقد قمت بالربط بين قاعده بيانات الأكسس والدلفي وكما هو مبين في الصوره فهناك حقول من نوع رقمي والأخرى عمله فأردت ضرب العمله في العدد الصحيح لإظهار المجموع كيف يتم ذلك

أم أجعل كل الحقول رقمي وفي الفورم في الدلفي أحولها على شكل عمله

هل هناك من طريقى مثلى لحل هذه المشكله كيف يثم كتابه الكود وماذا أفعل في الفورم :confused:

[صورة: M0yBHu.jpg]


كيفه أقوم بجمع حقلين مختلفين في القيمه؟ - ALG2009 - 29-08-2014

نفرض أنا edit1 هو حقل المجموع
و dbEdit2 هو حقل الكميه رقمي في قاعده البيانات
وdbEDIT3 هو حقل السعر والمشكل أنه عملة كيف نقوم بالحساب بين العمله والرقم
او نقوم بتغييرها في قاعده البينات إلى رقم حتى هي!!

Edit1.Text := floattostr(strtofloat(DBEdit3.text) * strtoint(DBEdit2.Text)) ;


البرنامج يعمل ولا يقوم بالحساب في حقل المجموع من نوع TEDIT لماذا؟


كيفه أقوم بجمع حقلين مختلفين في القيمه؟ - leader_dz - 30-09-2014

واجهتني نفس المشكلة و لم أتوصل إلى حل مع العلم أنني أعلم بأن المشكلة تكمن في أن الصيغ لكل من الحقلين ليس لهما نفس النوع.


كيفه أقوم بجمع حقلين مختلفين في القيمه؟ - Najy Ibraheem - 30-09-2014

السلام عليكم...

بالطبع يمكن إجراء العمليات الحسابية (جمع و طرح و ضرب ... إلخ) بين القيم العددية ذات الأنواع المختلفة بصرف النظر عن نوعها (Integer, Real, Currency,...) و لا داعي لتغيير أنواع الحقول. مثلاً يمكنك ضرب الكمية (رقم حقيقي) بالسعر (عملة) للحصول على الإجمالي.

لا أدري ما المقصود بأن الكود لا يعمل: هل يعطي خطأ أم أنه لا يظهر ناتج في المربع Edit1 ؟ و أين يوجد هذا الكود (في أي حدث مثلاً) ؟

جرب أن تضع Break Point على هذا السطر ثم تفحص قيم DBEdit2 و DBEdit3 لتتأكد من أن الخاصية Text لهما تعطي القيمة التي تتوقعها.

سلام.


كيفه أقوم بجمع حقلين مختلفين في القيمه؟ - ALG2009 - 01-10-2014

لقد وجدت المساعـده في منتدى آخر
وهو كتابه الكود في ADOTABLE وليس في كود textEDIT3 لتظهر النتيجه في السعر الإجمالي وهو textEDIT3