OpenEuphoria

Re: Please Help - Printing a BMP from EXW

• Posted by "Cuny, David at DSS" <David.Cuny at DSS.CA.GOV> Jun 06, 2000
• 502 views

ck wrote:

> I would like to print a BMP file from a
> windows EUPHORIA application. How would
> I do this?

If you are using Win32Lib, you should be able to BitBlt or CopyBlt it to the
printer. Something like this:

   -- warning: untested code!
   include win32lib.ew

   integer ignore

   -- load the bitmap
   constant theBitmap = loadBitmapFromFile("test.bmp")

   -- set up the printer to print a page
   ignore = getPrinter()
   ignore = startDoc( "Print Bitmap")
   ignore = startPage()

   -- send the bitmap to the page
   copyBlt( Printer, 10, 10, theBitmap )

   -- print the document
   ignore = endPage()
   ignore = endDoc()
   releasePrinter()

Hope this helps!

-- David Cuny