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

اقصى حد لتكبير الفورم

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

شباب لدي فورم وادرجت عليه صوره وعند طباعتها طلعت نصف ورقه

A4 اريد الصوره تطلع على كامل الصفحه 000

ثانيا ماهو اقصى حد لتكبير الفورم

#2

1- بافتراض ان الصورة علي الفورم ذاتة وليست داخل picturebox او image وان حجم الفورم نفس حجم الصورة فاستخدام هذا الكود يرسل الصورة مكبرة الى الطابعة بحجم الورقة كاملة

Private Sub PrintStretch()
Printer.PaintPicture Form1.Image, 0, 0, Printer.Width, Printer.Height, 0, 0, Form1.Width, Form1.Height
Printer.EndDoc
End Sub

2- اقصى حد لتكبير الفورم هو حجم الشاشة كاملة

Form1.Move 0, 0, Screen.Width, Screen.Height

Ali Sayed

#3

مشكوور اخي فودو لكن انا ماحصلت

الامر فى شيفرة الفورم

Private Sub PrintStretch()

ثم هل استطيع عمل لنافذة للفورم شريط تمرير لاعلى ولاسفل

#4

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

مثلا

Private Sub Form_Load()
PrintStretch
End Sub

Ali Sayed

#5

الف شكر اخي فوودو على حسن تجاوبك 000 اكرر الشكر

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

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