delphi4arab منتديات دلفي للعرب

نسخة كاملة : درس - التعامل مع Quickreport
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم و رحمة الله
إخواني الكرام بعد غياب طويل جئتكم بدرس يتناول لمحة بسيطة عن التعامل مع QuickReport

بسم الله نبدأ

1-نقوم بإنشاء فورم جديد
2-نقوم بإنزال المكون QuickRep من لائحة QReport
3-ننقر نقرتين على QuickRep و من Bandes نختار titre,en-tete-de-colonne,Bande détail,Récapitulatif
4-نقوم بإنزال المكون Query من لائحة BDE
5-نقوم بضبط خاصية Query1 ل DataBaseName ب DBDEMOS
6-نضيف الاستعلام التالي Query1==>SQL ب
كود :
select EmpNo,FirstName,LastName,Salary from employee
ثم
كود :
Active:=True;
7-نقوم بإضافة 5QRLabel على En-tete-de-colonne
8-نقوم بإنزال المكون QRexpr من لائحة QReport على détail و نكتب التعليمة COUNT في Expression
9-ثم نقوم بإضافة 4 من QRDBText على détail
10-ثم نقوم بضبط خاصية كل واحد منهم على التالي
QRDBText1==>Dataset==>Query1
QRDBText1==>DataField==>EmpNo
يمكنك إداج البقية كما هو موضح في الصورة
[صورة: quickreport.jpg]
11-نقوم بإضافة المكون QRExper في Résumé و نكتب التعليمة SUM(query1.Salary) في Expression لحساب مجموع الأجر
12-و لكي نشاهد علمنا ننقر بيمين الفأرة على QuickRep ثم ننقر على Prévisualiser
و في الفديو ترون كيف نؤطر عملنا في جدول
لتحميل الفديو من هنا
كود :
http://www.sendspace.com/file/skwbe7
الكود سورس في المرفقات
بالتوفيق إن شاء الله
شكراً لك عزيزي الكاتب
هل لديك طريقة ليصبح التقرير يظهر بشكل عرضي
abdalrhman كتب :ليصبح التقرير يظهر بشكل عرضي

هناك خاصية "Orientation" للخاصية page لل QuickReport غير قيمتها من poPortrait إلى poPaysage
بارك الله فيك
الفيديو غير موجود
حبذ لو أعدت رفعه من جديد
الفديو لو تكرمت
بارك الله فيك
كيف أكتب كتابة عمودية ؟
(22-07-2016, 01:36 PM)محمدي بكر كتب : [ -> ]كيف أكتب كتابة عمودية ؟

ألق نظرة على هذا الموضوع :

http://delphi4arab.net/forum/showthread.php?tid=2299