FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Printing
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
Printing
Posted: Wed Feb 08, 2012 12:12 PM

Hello,
for me sample testprev.prg from the Fivewin samples is not working any more.
Also my own code where I use oPrn:ImportWMF( "invoice.emf" ) is not working anymore.
Does someone have an advise.
Thanks in advance
Otto

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Printing
Posted: Wed Feb 08, 2012 03:16 PM
Otto,

This change is required in source\classes\rpreview.prg line 528:

Code (fw): Select all Collapse
   if lRebar .or. nStyle >= 2007
      #define NULL_BRUSH 5
      FixSays( ::oBar:hWnd, GetStockObject( NULL_BRUSH ) )
   endif


This solves the TestPrev.prg example error, thanks! :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Printing
Posted: Wed Feb 08, 2012 03:57 PM
In order to properly paint the EMF files these changes are required:

printer.prg line 862 and 886:
Code (fw): Select all Collapse
      if Upper( cFileExt( cFile ) ) == "EMF"


Code (fw): Select all Collapse
      if Upper( cFileExt( cFile ) ) == "EMF"


samples\TestPrev.prg seems to be working fine now, thanks! :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion