الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مساعدة

بدأه mouha-74 في 1 مايو 2010 · 2 رد · 567 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

لديا جدول دبقريد فيه مجموعة من الحقول من ضمنها حقول نمريك اريد جمعها في خانة اديت .كيف يكون الكود وحبذا مثال.

#2

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

الأمر يعتمد على الطريقة التي تريدها. إذا كنت تستعمل TQuery أو TADOQuery لجلب البيانات فيمكنك تعديل جملة SQL لإنشاء حقل يضم مجموع الحقول التي تريدها، مثلاً:

SELECT Field1, Field2, ..., FieldA, FieldB, ... (FieldA + FieldB + ...) AS Total FROM TableName

حيث Field1 و Field2 ... إلخ. هي حقول الجدول، و FieldA و FieldB ... إلخ. هي الحقول العددية التي تريد جمعها في حقل واحد أعطيناه الاسم Total. في هذه الحالة سيظهر الحقل Total مع بقية الحقول.

الطريقة الثانية هي أن تنشئ حقلاً محسوباً (Calculated Field) من النوع Real أو Integer (حسب نوع البيانات لديك) و تعطيه اسماً مثل Total أو غيره. ثم تذهب إلى الحدث OnCalcFields للـ DataSet لديك (Query أو Table) و تقوم بجمع الحقول التي تريدها:

Table1.FieldByName('Total').AsFloat := Table1.FieldByName('FieldA').AsFloat + Table1.FieldByName('FieldB').AsFloat + ...

و لعرض النتيجة في مربع نص يمكنك استعمال DBEdit أو DBText و ربطه بالحقل Total.

نرجو الاستفادة و السلام.

وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ

صدق الله العظيم

#3

بارك الله فيك.

مواضيع مشابهة