Use the code below to print a bitmap to a print document which is then sent to PDF-XChange 4.0. PDF-XChange 4.0 is selected as the printer when the print dialog is shown.
Use a filename in the Bitmap Class constructor to load an image from the file system. Here I have created an elipse on the bitmap.
If you want to print directly to the PDF without showing the print dialog then you will have to configure PDF-XChange 4.0 to print to a file.
Public Class PrintForm
Private Sub Print_Click(sender As System.Object, e As System.EventArgs) Handles Print.Click
Dim pdoc As New Printing.PrintDocument
Dim pdlg As New PrintDialog
pdlg.ShowDialog()
pdoc.PrinterSettings.PrinterName = pdlg.PrinterSettings.PrinterName
AddHandler pdoc.PrintPage, AddressOf PrintPage
pdoc.Print()
End Sub
Public Sub PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs)
Dim b As New Bitmap(200, 200)
Dim gr As Graphics = Graphics.FromImage(b)
gr.DrawEllipse(New Pen(Brushes.AliceBlue), New Rectangle(0, 0, 200, 200))
e.Graphics.DrawImage(b, New Point(0, 0))
End Sub
End Class
Hope this helps :)
printing bitmap image.
Microsoft
