EasyDelphi Q&A
+1 تصويت
47 مشاهدات
سُئل في تصنيف vcl بواسطة (360 نقاط) | 47 مشاهدات

1 إجابة واحدة

0 تصويتات

لكي تقوم بعمل طباعة في الفاست ربورت إستنادا على قيم مكونات موجودة في الفورم مثل EDIT أو Memo أو Label ليس لها علاقة بتاتا بقاعدة المعطيات فهذا الأمر قد يبدو صعبا نوعا ما  ....

و لكن إذا ما تمعنا جيدا في الأدوات التي يوفرها لنا الدلفي فقد نجد الحل الأفضل ...

أولا الفاست ربورت و غيرها هي عبارة عن مكتبات تتيح للمبرمج طباعة التقارير إنطلاقا من قاعدة معطيات بصفة عامة في خانة MasterBand

و لا يمكننا تقرير أي محتوى موجود في مكون من المكونات السابق ذكرها (مثل EDIT أو Memo أو Label) إن لم يكن هذا الأخير له علاقة مباشرة أو غير مباشرة بقاعدة المعطيات مثل (DbEDIT أو DbMemo أو DbComBoBox و غيرها .....)

و هذا السؤال في الحالة العادية و على مستوى MasterBand خصوصا ليس له جواب ... و لكن قد يمكننا الجواب عليه و بطريقة ذكية ....

ثانيا : لقد كان سؤالك عن كيفية طباعة محتوى أو قيم هذه المكونات بواسطة مثلا الفاست ربورت .... ؟

الجواب و ببساطة هو عمل حقول وهمية داخل جدول وهمي لهذه القيم بواسطة المكون TVirtualTable و بعدها و بعد تفعيل خاصية Active:=True نقوم بصنع LiveBinding لهذا الجدول مع المكونات الحقيقية التي نريد طباعة محتواها مثل TEdit مثلا و لكي نتأكد من أننا في الطريق الصواب نضيف مكون TDataSource و نقوم بربطه مع الجدول الأفتراضي TVirtualTable  و نضيف مكون TDbEdit و نربطه هو أيضا بالمكون TDataSource في خاصية DataSource (يعني عادي و كأنه جعلنا هذه ال Edit عبارة عن حقل من قاعدة المعطيات ) فتظهر لك مباشرة في خاصية DataField إسم الحقل المربوط بواسطة LiveBinding مع المكون TEdit ...  هههههه

و هنا نفذ البرنامج و قم بالكتابة على مستوى TEdit و سوف ترى أن المكون TDbEdit هو أيظا يستجيب و يأخذ قيمة الEdit .....

المهم لا أريد الأطالة أكثر في الطريقة و كيفية تنفيذها كتابيا ..... لأن شرح الأجابة بالكتابة فقط غير كافي ....

تفضل بمشاهدة الفيديو من هنا . و قم بالأنظمام 'Subscribe' و أنقر على إعجاب 'Like' و فعل الجرس .....

أو قم بتحميل الفيديو مضغوطا من هنا .

و لتحميل المثال مع الكودسورس من هنا .و الباسوارد لفك الضغط كالعادة "EasyDelphi.com/qa" و شهية طيبة لك و لمن يهمه الأمر ...

 

تم الرد عليه بواسطة (18,030 نقاط)
عُدل بواسطة

اسئلة متعلقة

+2 تصويتات
1 إجابة
سُئل أكتوبر 3، 2018 في تصنيف vcl بواسطة reema (310 نقاط) | 26 مشاهدات
+4 تصويتات
1 إجابة
سُئل أغسطس 29، 2018 في تصنيف vcl بواسطة Yamada Fakir (1,640 نقاط) | 48 مشاهدات
+3 تصويتات
3 إجابة
سُئل سبتمبر 4، 2018 في تصنيف vcl بواسطة Yamada Fakir (1,640 نقاط) | 106 مشاهدات
0 تصويتات
1 إجابة
سُئل يناير 17 في تصنيف Delphi بواسطة Djamal Mohamed (180 نقاط) | 51 مشاهدات
ادعُ اصدقائك في الفايسبوك لمشاركتك
Comodo SSL

مرحبًا بك إلى EasyDelphi Q&A، حيث يمكنك طرح الأسئلة والحصول على الإجابة عليها من المستخدمين الآخرين.

لا يسمح بطلب او السؤال عن كراك او تفعيل او كسر او فك او اي شيء يخالف اتفاقيات الترخيص  مهما كان السبب ومهما كان البرنامج ونوعه. ولا حتى نشر روابط تحتوي على مثل هذه الاشياء لا في الاسئلة ولا في الاجابات ولا التعليقات . نهائيا

396 سؤال
634 إجابة
1,130 تعليق
237 مستخدم