Skip to main content
Pelajar Koding

follow us

Vb.Net: Print Gambar Dengan Printdocument

Di postingan aku perihal print pribadi ke printer (buat aplikasi POS/kasir) , muncul pertanyaan klo print gambar gimana. Di postingan itu sebenernya direct print nya masih yang simple print plain teks saja tanpa format detail. Klo ada waktu Insya Allah Rani tambahkan buat direct printing dengan format dan gambar. Untuk mencetak gambar, mungkin artikel ini mampu menolong memahami lebih awal bagaimana cara print image. Dan buat kalian yang masih belum kenal apa itu PrintDocument, baca juga artikel ini ya! Mengenal PrintDocument Control Formula Dasar: Bagaimana cara kerja nya? Berikut ini beberapa pola untuk menjelaskannya. Contoh acara pertama image / gambar akan diambil dari file yang disimpan di c:\logo.png. Mari kita buat UI nya apalagi dahulun. Rani tambahkan suatu  button dan PrintDocument ke dalam form mirip berikut: Code: Imports  System.Drawing.Printing Public Class   Form1      Private Sub  Button1_Click(sender  As Object , e  As  EventArgs )  Handles  Button1.Click         PrintDocument1.Print()      End Sub      Private Sub  PrintDocument1_PrintPage(sender  As Object , e  As  PrintPageEventArgs ) _                 Handles  PrintDocument1.PrintPage          Dim  newImage  As  Image  =  Image .FromFile( "c:\logo.png" )         e.Graphics.DrawImage(newImage, 50, 50)      End Sub End Class Coba Run dan klik tombol untuk mulai mencetak. Hasilnya:  (aku pakai pdf printer) Kalau gambar diambil dari PictureBox gimana caranya? Ok kita coba tambahkan sebuah PictureBox  dan set image property-nya. Kemudian instruksi yang perlu diubah cuma image object nya saja yang mengambil dari property picturebox, mirip berikut: Private Sub  PrintDocument1_PrintPage(sender  As Object , e  As  PrintPageEventArgs ) _             Handles  PrintDocument1.PrintPage     e.Graphics.DrawImage(PictureBox1.Image, 50, 50) End Sub Hasilnya sama, alasannya aku memakai gambar yang sama: Secara default sintaks akan mencetak ukuran gambar bekerjsama, tapi kita juga mampu mengaturnya secara manual dengan sintaks di bawah ini. Kita coba menertibkan lebar (width) = 100 dan tinggi (height) = 50. Private Sub  PrintDocument1_PrintPage(sender  As Object , e  As  PrintPageEventArgs ) _             Handles  PrintDocument1.PrintPage     e.Graphics.DrawImage(PictureBox1.Image, 50, 50, 100, 50) End Sub Hasil print akan seperti gambar di bawah. Lebih lengkap bahasan perihal printing dengan PrintDocument ada di postingan di bawah ini ya. Tutorial Printing dengan PrintDocument
Sumber http://rani-irsan.blogspot.com

You Might Also Like:

Comment Policy: Silahkan tuliskan komentar Anda yang sesuai dengan topik postingan halaman ini. Komentar yang berisi tautan tidak akan ditampilkan sebelum disetujui.
Buka Komentar