[RESOLVED] Print Bitmap

[Strider]

How do i go about reading a bitmap from a file and sending it via a StreamWriter to a printer?

so far i 've been using this code:

Dim i As Integer
        Dim bBitmap As New Bitmap(p_bmLoc)
        Dim bByte((bBitmap.Width * bBitmap.Height * 3) - 1) As Byte
        For y As Integer = 0 To bBitmap.Height - 1
            For x As Integer = 0 To bBitmap.Width - 1
                Dim oColour As Color = bBitmap.GetPixel(x, y)             
                bByte(i) = oColour.R
                bByte(i + 1) = oColour.G
                bByte(i + 2) = oColour.B
                i += 3
            Next
        Next

[Zakary]

Hi Strider!

A way you could do this, is by usage of a Printing.PrintDocument class and by GDI+

Printing.PrintDocument have event call PrintPage that have a Graphics handle parameter, that you can use to insert any GDI Object such as a Bitmap

Private WithEvents mRpt As Printing.PrintDocument
 
Private Sub mRpt _PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles mRpt.PrintPage
 
    Dim Bmp As New Bitmap("MyImageFile")
    Dim ImgLocation As New Point(10, 10)
    e.Graphics.DrawImage(Bmp, ImgLocation)
 
End Sub

Hope it help !!