[RaggiTech]

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

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

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


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


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

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

كود :

PrintForm1.Print()

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

[RaggiTech]

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

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

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

كود :

PrintForm1.PrintAction = Printing.PrintAction.PrintToFile

أما لو أردت عرض الفورم قبل الطباعة سنكتب

كود :

PrintForm1.PrintAction = Printing.PrintAction.PrintToPreview

أو لو أردنا الطباعة إلى الطابعة سنكتب

كود :

PrintForm1.PrintAction = Printing.PrintAction.PrintToPrinter

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

كود :

PrintForm1.Print()

[RaggiTech]

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

كود :

PrintForm1.PrinterSettings.

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

كود :

PrintForm1.PrinterSettings.Copies = 2

[RaggiTech]

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


وهى تتضمن


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

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

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

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


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

كود :

PrintForm1.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.Scrollable)