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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : تعديل كود طباعة (/showthread.php?tid=1123)

تعديل كود طباعة - asto - 29-11-13

السلام عليكم

اطلب تعديل هذا الكود لطباعة عنصر معين فقط في الفورم و هو picture2

كود :
Set Picture1.Picture = CaptureClient(Me(

CommonDialog1.CancelError = True

On Error GoTo Exitsub

   CommonDialog1.ShowPrinter

   Call PrintPictureToFitPage(Printer, Picture1.Picture)

Printer.EndDoc

   Exit Sub

Exitsub:

Exit Sub


RE: تعديل كود طباعة - تركي الحلواني - 29-11-13

وعليكم السلام ورحمة الله وبركاتة

لما يأخي لا تستخدم التقرير لطباعة الصورة

او تقوم بفتحة بأستخدام برنامج ويندوز من الفجوال وتقوم بطباعتها

RE: تعديل كود طباعة - asto - 29-11-13

لان هذا يا اخي برنامجي يولد باركود و اريد طباعته

RE: تعديل كود طباعة - أبو عمر - 29-11-13

في حدث كود الطباعة


Printer.PaintPicture Picture1.Picture, 0, 0, _
Picture1.Width, Picture1.Height

Printer.EndDoc