تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طباعة صوره
#1
السلام عليكم ورحمة الله وبركاتة

اخواني الافاضل الان انا لدي صوره مصممه سابقا بنفس حجم ورقة الـ a4 و اريد طباعة الصوره

الصوره موجوده داخل picturebox1 ياريت طريقة طباعتها و جزاكم الله خيرا
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

كود :
Dim Print As New Printing.PrintDocument
        AddHandler Print.PrintPage, Sub(obj As Object, ev As Printing.PrintPageEventArgs)
                                        ev.Graphics.DrawImage([color=#ff0000]PictureBox1[/color].Image, 0, 0)
                                    End Sub
        [COLOR=#0000cd]For Each Printer In Printing.PrinterSettings.InstalledPrinters
            If MsgBox(Printer, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
                Print.PrinterSettings.PrinterName = Printer
                Exit For
            End If
        Next
[/COLOR]        Print.Print()

المحدد بالأزرق يظهر للمستخدم أسماء الطابعات وإذا اختار Yes في أي من الطابعات سوف يطبع الصفحة من خلالها وإذا لم يختر شيئ سيتم الطباعة بالطابعة الإفتراضية
[SIZE=6]لا إله إلا أنت سبحانك إني كنت من [/SIZE][SIZE=6]الظالمين[/SIZE][SIZE=6]
[/SIZE]
الرد }}}
تم الشكر بواسطة:
#3
اذا كان لدي صفحة اكسل واريد ان اطبعها تكون على صفحة واحدة ولكن احيانا يتم تكبير احد الاعمدة تلقائيا وتاتي على اكثر من صفحة هل من طريقة لكي ابقي على نفس التصميم ف صفحة واحدة
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم