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

عرض التقرير أكبر من عرض الصفحة

مغلق
بدأه Ferasieev في 21 أكتوبر 2003 · 2 رد · 914 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

أعمل على برنامج يحوي على داتا ريبورت وعرض التقرير حوالي 15000 تويب وهو ما يكافئ عرض الورق المطبوع حوالي 33 سم (طبعا الطابعة نقطية وتطبع أوراق بهذا الحجم).

المشكلة أنه عند فتح التقرير يعطي رسالة مفادها أن عرض التقرير أكبر من عرض الصفحة.

وضعت الأمر التالي لتغيير عرض صفحة الطباعة قبل فتح التقرير:

printer.width = 15000

ولكن لا فائدة، لا تزال الرسالة تظهر. ولكن عند تغيير إعداد الطابعة إلى حجم ورق A2 (على ما أذكر) والذي عرضه حوالي 42 سم فإن التقرير يفتح بشكل صحيح، وعند وضع حجم مخصص للورق (مهما كان كبير) في إعدادات الطابعة تعود الرسالة لتظهر.

سؤالي: كيف أستطيع تغيير حجم ورق الطباعة برمجيا دون اللجوء إلى إعدادات الطابعة.

مع الشكر

#2 
Printer.PaperSize = PrinterObjectConstants.vbPRPSA3

Ali Sayed

#3

شكرا لك أخ VOODOO على جوابك ولكن (مع اعتقادي أن كلامك صحيح) لم ينجح الأمر

فهو لم يؤثر شيء على الطباعة، فإن وضعت في خيارات الطابعة A2 تنجح العملية حتى لو وضعت في البرمجة A4 وبوضعها A4 مثلا في إعدادات الطابعة لم تنجح العملية مهما كان الكود.

في الحقيقة أنا لا أريد ورق A2 وإنما حجم مخصص قريب منه لذلك كتبت الكود التالي ولم ينفع طبعا:

Printer.PaperSize = PrinterObjectConstants.vbPRPSUser
'Printer.Width = 17810
'Printer.Height = 12708

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

تم تعديل هذه المشاركة بواسطة Ferasieev في 28 أكتوبر 2003 في 13:12

هذا الموضوع مغلق.

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