منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
معلومة ::: PrintForm - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : معلومة ::: PrintForm (/showthread.php?tid=5285)



معلومة ::: PrintForm - RaggiTech - 06-10-12

كاتب الموضوع : BADRMEDIA



تكلمنا عن مجموعة Microsoft Visual Basic 2005 Power Packs 2.0

وشرحنا فيها عنصر RectangleShape وعنصر OvalShape


وجاء الدور لنتعرف على العنصر PrintForm الموجود مع مجموعة


هذا العنصر يساعد على طباعة الفورم مباشرة دون عناء

كل ما فى الأمر ضعه على الفورم وضع زر أمر - اكتب فى حدث زر الأمر فقط



كود :
PrintForm1.Print()

سيقوم بالطباعة بالاعدادات الافتراضية للطباعة





معلومة ::: PrintForm - RaggiTech - 06-10-12

سنقوم ببعض التخصيصات قبل الطباعة

ماذا لو أردت أن تطبع إلا ملف وليس إلى الطابعة

سنكتب قبل ينطلق أمر الطباعة



كود :
PrintForm1.PrintAction = Printing.PrintAction.PrintToFile
أما لو أردت عرض الفورم قبل الطباعة سنكتب


كود :
PrintForm1.PrintAction = Printing.PrintAction.PrintToPreview
أو لو أردنا الطباعة إلى الطابعة سنكتب


كود :
PrintForm1.PrintAction = Printing.PrintAction.PrintToPrinter

ثم نطلق الأمر فى النهاية


كود :
PrintForm1.Print()




معلومة ::: PrintForm - RaggiTech - 06-10-12

يمكن عن طريق الأمر PrinterSettings قبل أن نطلق أمر الطباعة أن نقوم ببعض التخصيصات



كود :
PrintForm1.PrinterSettings.

مثلا عدد النسخ التى ستطبع



كود :
PrintForm1.PrinterSettings.Copies = 2




معلومة ::: PrintForm - RaggiTech - 06-10-12

الخاصية PrintOption لنتعرف عليها


وهى تتضمن


ClientAreaOnly()
CompatibleModeClientAreaOnly()
CompatibleModeFullWindow()
FullWindow()
Scrollable()

ويتم ارسالها مع أمر الطباعة واهمها

Scrollable لو أردت أن تطبع الجزء الظاهر فقط

FullWindow لو أردت أن تطبع كل الفورم حتى لو كان هناك ScrollBar


ويكون الأمر كالتالى :




كود :
PrintForm1.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.Scrollable)