FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour How to enhance image-quality => oPrinter:SayImage ?
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
How to enhance image-quality => oPrinter:SayImage ?
Posted: Mon May 19, 2014 06:12 PM
Hello,

is it possible, to get a better image-quality using oPrinter:SayImage

I added a print-solution and noticed a bad image-quality.

The image on screen ( JPG 1500 x 2300 )



The image on print-preview
the size is calculated to fill a DIN A4
oPrinter:SayImage( 260, 150, oDrawImg, nImgWidth * 0.83, nImgHeight * 0.83 )

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
Posts: 512
Joined: Mon Oct 17, 2005 10:38 AM
Re: How to enhance image-quality => oPrinter:SayImage ?
Posted: Fri Apr 29, 2016 07:06 AM

Hello Uwe.
Did you find a solution for this problem ?
Thanks a lot.

Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: How to enhance image-quality => oPrinter:SayImage ?
Posted: Sun May 01, 2016 07:07 AM

¿ if you use oprn:saybitmap() ?
Regards.

Posts: 512
Joined: Mon Oct 17, 2005 10:38 AM
Re: How to enhance image-quality => oPrinter:SayImage ?
Posted: Sun May 01, 2016 07:15 AM

Hi.
I have a JPG file, so I must use the sayimage method.
The strange thing is that if I print directly there is no problem.
That blurry effect appears only in the preview window.

I made just now a test. I've opened the file in the temp directory, where windows places
the EMF files. The file is correct, with no problem at all.
Maybe that effect is made by the EMF viewer in the preview window.

Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: How to enhance image-quality => oPrinter:SayImage ?
Posted: Mon May 02, 2016 02:37 AM
Please try using oPrn:PrintImage(...)
Code (fw): Select all Collapse
function PrnImage()

   local oPrn

   local nRow     := 500
   local nCol     := 500
   local nWidth   := 352 * 5
   local nHeight  := 450 * 5
   local lStretch := .t.

   PRINT oPrn PREVIEW
   PAGE
      oPrn:PrintImage( nRow, nCol, "c:\fwh\bitmaps\olga1.jpg", nWidth, nHeight, lStretch )
   ENDPAGE
   ENDPRINT

return nil


Regards



G. N. Rao.

Hyderabad, India
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: How to enhance image-quality => oPrinter:SayImage ?
Posted: Mon May 02, 2016 04:01 AM

Please also see

viewtopic.php?f=3t=32370

&

Regards



G. N. Rao.

Hyderabad, India
Posts: 512
Joined: Mon Oct 17, 2005 10:38 AM
Re: How to enhance image-quality => oPrinter:SayImage ?
Posted: Mon May 02, 2016 07:00 AM

Hi.
Sorry, I'm not using the last versions of FWH :(

Continue the discussion