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

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

كيفية طباعة الرسومات - محمد بن صريتي - 19-02-15

السلام عليكم
كيف يمكن طباعة الرسومات التي رسمت داخل PictureBox او form
ارجوا المساعدة

RE: كيفية طباعة الرسومات - Genius Live - 19-02-15

كود :
   Dim WithEvents PD As New Printing.PrintDocument
   Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
       PD.Print()
   End Sub
   Private Sub PD_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PD.PrintPage
       e.Graphics.DrawImage(PictureBox1.Image, e.MarginBounds.Left, e.MarginBounds.Top)
   End Sub


RE: كيفية طباعة الرسومات - محمد بن صريتي - 22-02-15

السلام عليكم
شكرا اخي ابو انس علي الرد
لكن عند استخدام الكود يظهر كما في الصورةالمرفقة
ولو ممكن كود بستخدام PrintDialog ولكم جزيل الشكر

RE: كيفية طباعة الرسومات - محمد بن صريتي - 04-03-15

إقتباس :كيف رسمت داخل PictureBox او form ليتم معرفة طباعتها بالطريقة الصحيحة.

السلام عليكم
الملف المرفق يحتوي علي طريقة الرسم

RE: كيفية طباعة الرسومات - raoe-041 - 04-03-15

تفضل اخي الكريم ......................

بعد اضافة الاداة print Form 

PHP كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        PrintForm1.PrintAction = Printing.PrintAction.PrintToPreview
        PrintForm1.Print()

    End Sub 

اليك ملف مرفق ....... ارجو ان تستفاد

[attachment=6709]