الطباعة في الفجوال بيسك؟؟

المصدر: الطباعة في الفجوال بيسك؟؟
في منتدى : قسم الكومبيوتر العام ( حل مشاكل - تبادل خبرات )

اود ان اتعلم كيفية الطباعة في الفيجوال بيسك بحيث تكون الطباعة بحجم ورقة A4 كاملة ،حاولت جاهدا بذلك ولكن كانت النتيجة ان تكون الطباعة فقط على مستوى الشاشة :blink:

 

لو تكرم أحدكم يشرح الأوامر اللازمة لطباعة محتويات الشبكة msflexgrid على الورق عبر الطابعة

 

مساعدة

السلام عليكم
هذا الكود يهيء الطابعة الافتراضية في النظام لتطبع على ورقة A4 وتكون قائمة والطباعة ستكون بالألوان مع أقصى حد ممكن من الدقة
With Printer
.PaperSize = 9
.Orientation = 1
.ColorMode = 2
.PrintQuality = -4
End With
ثم تكتب أوامر الطباعة التي تريد (وهي معقدة) ولكن لا تنس ما يلي
Printer.EndDoc

 

بارك الله فيكم
ولكن اخي اظن انها معقدة و صعبة شوي
وشكرا

 

هذا شرح الطباعه في الفيجيوال للكاتب محمد الحفار

موضوع مهم : تعلم كل شيء عن الطباعة في الفيجوال بيسك 6.0

----------------------------------- بسم الله الرحمن الرحيم ---------------------------------------------------

الموضوع : تعليم الطباعة
تقديم : محمد الحفار
أخي الكريم/أختى الكريمة
نظرا لاهمية الطباعة في الفيجوال بيسك سوف أقوم بشرح كل ما يأتي
1.طباعة المشروع من فيجوال بيسك
2.طباعة النافذة
3.استخدام كائن الطباعة printer object لطباعة الخطوط والدوائر
4.معرفة رقم الصفحة الحالية


يمكن للبرنامج أن يستقبل البيانات ويتعامل معهالا ويعرضها على الشاشة ولكن هذا ليس كل شيء فحتما سيحتاج البرنامج الى طباعة بعض المعلومات على الطابعة ويتيح لك الفيجوال بيسك طريقيتين مختلفتين لطباعة المعلومات من داخل البرنامج:
1.عرض البيانات على النافذة form ثم طباعتها
2.ارسال البيانات مباشرة الى الطابعة بأستخادم كائن الطابعة printer object

اولا: طباعة النافذة
ان طباعة النافذة هي أبسط اسلوب لطباعة المعلوامت لكي تطبع نافذة الاستاخدم قم بكتابة الامر التالي:
me.printform
وهذا الامر سوف يرسل أمر لطباعة لكي تطبع الفورم وما يحتويه من أداوت والوان
من الممكن ان تطبع أي نافذة في البرنامج بما في ذلك النوافذ الظاهرة على الشاشة او النوافذ المصغرة ولكن العيب الوحيد في هذه النقطة هو ان وجود الطباعة ودرجة وضوحها قد لا تكون عالية
فمعظم الشاشات تعرض 96 نقطة في البوصة في حين ان معظم طابعات لليزر تطبع بدرجة وضوح 300 نقطة في البوصة او اعلى فاذا كانت تريد طباعة الملعومات في برنامجك بسرعة فان امر printform سيعمل بصورة مرضية واذا كنت تريد وضوح أعلى عند الطباعة أستخدم الكائن الطابعة printerobject

ثانيا: الطباعة بأستخدام كائن الطابعة
ان كائن الطابعة هو مساحة مؤقتة على ذاكرة الحاسب وقبل ان تطبع اي شيسء على كائن الطابعة يجب ان تحددهوامش الصفحة العلوية والسفلية واليمنى واليسرى ولكي تحدد هامش الصفحة العلوي تستخدم الامر التالي
printer.scaletop=value
حيث value هي قيمة الهامش العلوي
اما لتحديد الهامش السفلي فانك تحتاج الى الامر اتالي
printer.scalebottom=value
واما الهامش الايسر تحتاج الى الامر التالي
printer.scaleleft=value
واما الهامش الايمن تحتناج الى الامر التالي
printer.scaleright=value
طباعة النص على كائن الطابعة
قبل ان تطبع النص على كائن الطابعة يجب ان تحدد الموقع الافقي والراسي للمكان الذي تريد ان يظهر فيه النص ولكي تحدد يجب استخدام الامر التالي
printer.currentx=xvalue
printer.curreny=yvalue
هذان الامران يقولان لفيجوال بيسك ابدأ الطباعة النص في المكان الذي تحدده خاصيتا
xvalue,yvalue
فمثلا اذا اردت ان تبدأ الطباعة في أعلى يسار الصفحة أستخدم الامر التالي
color=red]printer.currentx=0
color=red]printer.currenty=0
وبعد ان تحدد المكان الذي ستبدأ الطباعة فيه يمكنك ان تبدأ بالفعل بالطباعة بعض النصوص ولعمل ذلك أكتب الامر التالي
color=red]printer.currentx=0
color=red]printer.currenty=x0
color=red]printer.print "hafar"
ولكن طباعة النصوص العربية تختلف قليلا فيجب ان تحدد خاصية ريت تو ليفت فيصبح الكود هكذا
color=red]printer.righttoleft=true
color=red]printer.currentx=0
color=red]printer.currenty=0
printer.print "محمد الحفار"
color=red]printer.enddoc
ثالثا: طباعة الخطوط والدوائر بأستخدام كائن الطابعة
يجب اولا تحديد سمك الخطوط والامر التالي
printer.drawwidth=1
ولكي ترسم خطوط بأستخدام كائن الطباعة يجب عليك كتابة الامر التالي
printer.line(x1,y1)-(x2,y2)
حيث x1,y1 هي النقطة التي منها سوف يرسم الخط وx2,y2 هي النقة التي سينتهي عندها
رسم الدائرة بأستخدام كائن الطابعة
أستخدم الامر التالي
printer.circle(x,y),radius
حيث x,y هما مركز الدائرة و radius هو مركز الدائرة
تحديد جودة الطباعة
يتيح لك فيجوال بيسك ان تحدد جودة الطباعة وبالطبع يختلف هذا بحسب أمكانية الطابعة التي تستخدمها والامر التالي سوف يحدد الجودة
printer.printquality=x
حيث x يمثل قيمة سالبة بين -1 -4 او قيمة موجبة تحدد درجة الوضوح
التي تريد ان تستخدمها بأستخدام مقياس النقطة في البوصة واليك الجدول التالي يحدد نسبة الوضوح في سالب
-1 مشودة
-2 منخفضة
-3 متوسطة
-4 عالية
معرفة رقم الصفحة الحالية
وذلك بأستخدام الكود اتالي
printer.page
انهاء الطباعة
وذلك بأستخدام الامر التنالي
printer.end doc
طباعة المشروع الحالي في وقت التصميم
ويتيح لك الفيجوال بيسك ثلاث طرق لطباعة المشرؤع وهم
form image ويقوم بطباعة فقط الصور
code يطبع الاوامر فقط
form as text يطبع خصائص الكائنات
ولكي تطبع المشروع الحالي في وقت التصميم اتبع الخطوات التالية
1. أختر امر برينت من قائمة ملف سيعرض مربع حوار برينت
2. أنقر خيار current module لكي تطبع الملف المحدد في نافذة مستكشف المشروع فقط او خيار current project لكي تطبع المشروع بكامله
3. انقر أحد خيارات form image -- code --- form as text
4. تاكد من ان الطابعة جاهزة وقم بنقر على زر موافق

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

اخوكم : المبرمج محمد الحفار
جميع الحقوق محفوظة www.hafar2002.tk
vovesleep@hotmail.com

 

شكرا جزيلا على هذا الموضوع الجميل

 

بارك الله فيك

 

شرح كامل و وافي تشكر عليه اخ محمد الحفار

 

شكررررررررررررررررررررررررراً