وعليكم السلام
أخي،
نعم، ممكن .
أخي - أنت لم تذكر قاعدة البيانات المستعملة + المكون الذي تستعمله في الطباعة .
المهم أنا استعمل Paradox و Quick report
توجد عدة طرق ،
كل شخص لديه فكرة ، وانا راح اقدملك فكرتي
-أولا :
قم بنسخ جدول الكشف (لنفترض ان اسمه StudentsList ) إلى أي اسم آخر أنا راح اسميه
StudentListPrint
في الدلفي وليس في قاعدة البانات لكي يتم العمل بالكشوفات التي قمت بإدخالها
- ثانيا :
بداخل المكون Quick Report قم بتحديد DataSource تبع StudentListPrint عبر DataSet
لكي يطبع كل الكشوفات دفعة واحدة
ملاحظة إذا لم تحدد DataSet سيطبع الكشف المحدد في الجدول
- ثالثا :
- لتحديد مثلا عدد معين
كما تود أنت (من 1 إلى 10 ) . نقوم بفلترة الجدول الثاني طبعا StudentListPrint
أكتب الكود التالي : قبل تنفيذ أمر الطباعة :
كود :
[align=left]StudentListPrint.Filter:=('(no_ent=10)or(no_ent<10)');[/align]
[align=left]StudentListPrint.Filtered:=True[/align]
;
no_ent = هو اسم الحقل الذي يحتوي على رقم الكشف
في هذا الكود سيطبع جميع الكشوف التي عددها يساوي 10 وأقل من 10
إذا كنت تود طباعة الكشوفات من 5 إلى 10 :
أكتب الكود التالي : قبل تنفيذ أمر الطباعة :
كود :
[align=left]StudentListPrint.Filter:=('((no_ent=5)or(no_ent>5)and(no_ent<10)or(no_ent=10))');[/align]
[align=left]StudentListPrint.Filtered:=True;[/align]
في هذا لكود سيطبع جميع الكشوف التي عددها يساوي 5 أوأكبر من 5 و يساوي 10 أو أقل من 10
بعدها أمر الطباعة عادي
كود :
[align=left]Quickrep1.Print; // للطباعة مباشرة
// او[/align]
[align=left]QuickRep1.Preview; // للمعاينة قبل الطباعة[/align]
لا تنسانا بالدعاء الصالح
