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

استفسار بسيط جدا عن الطابعة

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

الاخوة الاعزاء عندي تقارير عمودية وتقارير افقية

اريد عند الضغط على زر التقرير العمودي تتحول الطابعة الافتراضية الى الوضع العمودي

وكذلك اريد عند الضغط على زر التقرير الافقي تتحول الطابعة الافتراضية الى الوضع الافقي

دون تدخل المستخدم وظهور خصائص الطباعة

#2

السلام عليكم ورحمة الله وبركاته

أخى العزيز المهنا

إجابة سؤالك تعتمد إلى حد بعيد على البرنامج الذى تستخدمه للطباعة

إذا كان مثلا كريستال ريبورتس :

فلن تحتاج إلى تغيير أى شئ وإعدادات الصفحة فى التقرير ستقوم بالمهمة عنك

إذا كان الداتا ريبورت:

فأسأل الله أن يعينك عليها فقد قاسيت وعانيت منها كثيرا من قبلك

أما إذا كنت تطبع من خلال تعاملك مع الطابعة من خلال أوامر برنامجك:

فالأمر أبسط من بسيط بإذن الله

فقط تغير الـ Orientation لكائن الطابعة

Printer.Orientation = vbPRORLandscape

Printer.Orientation = vbPRORPortrait

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

Printer.Orientation = cmDlg.Orientation

وأعتقد أنه لن ينقصك شئ بعد هذا إلا أن تستعين بالله وتتكل عليه

وربنا يعينك

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

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

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