• Home
 · 
• Graphics
 · 
• Convert an 8-bit BMP (Windows Bitmap) to an 8-bit RAW (raw pixel data)

Convert an 8-bit BMP (Windows Bitmap) to an 8-bit RAW (raw pixel data)

Convert an 8-bit BMP (Windows Bitmap) to an 8-bit RAW (raw pixel data)

Rate Convert an 8-bit BMP (Windows Bitmap) to an 8-bit RAW (raw pixel data)

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Function BMPtoRAW(fullbmptxt As String, outfilename As String) As Boolean
     'This function shaves off the first 1078 characters of the
     'bitmap file, then saves the resulting data into a raw file
     'off the specified name
     On Error Goto err_BMPtoRAW
     Dim wrkstr As String
          wrkstr = Mid$(fullbmptxt,1079)
          Open outfilename For Output As #1
               Print #1, wrkstr
          Close #1
          BMPtoRAW=True
     end_BMPtoRAW:
          Exit Function
     err_BMPtoRAW:
          BMPtoRAW=False
End Function