FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for CA-Clipper PREVIEW PROBLEM
Posts: 98
Joined: Mon Jan 23, 2006 09:34 AM
PREVIEW PROBLEM
Posted: Sun Mar 11, 2007 06:57 PM

Hi
i have a problem with preview: print... preview
sometimes it works and sometimes no :i see a blank page and when i print it i allready have a blank page
If i delete the "preview" it will print very well
Some other days the preview works good.
Can everybody explain me how the preview works?

I' using FW 2.1
Thanks

Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
PREVIEW PROBLEM
Posted: Mon Mar 12, 2007 06:15 PM

Preview makes a temp-file to windows-temp folder. If you get an error during printing the temp-file is still there and locked. And the new file can't be created because FW uses always the same name. I changed printer class for me.
Otto

METHOD _StartPage() CLASS TPrinter

LOCAL lSetFixed
LOCAL aDirTMP := {}

If ::hDC = 0
Return NIL
endif

lSetFixed := Set(_SET_FIXED,.F.)

if !::lMeta .AND. !::lStarted
::lStarted := .T.
StartDoc( ::hDC, ::cDocument )
endif

::nPage++

if ::lMeta
aDirTMP := directory(::cDir+"*.wmf", "D")
AAdd(::aMeta,::cDir+"\T"+ALLTRIM(STR(len(aDirTMP)+1))+Padl(::nPage,4,"0")+".wmf")
::hDCOut := CreateMetaFile(Atail(::aMeta))
else
StartPage(::hDC)
endif

Set(_SET_FIXED,lSetFixed )

Return NIL

Posts: 98
Joined: Mon Jan 23, 2006 09:34 AM
PREVIEW PROBLEM
Posted: Mon Mar 12, 2007 07:19 PM

Thanks
it is very usefull
Patrick

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
PREVIEW PROBLEM
Posted: Mon Mar 12, 2007 08:39 PM

Otto,

You can use:

AAdd( ::aMeta, ::cDir + cTempFile( "\", "wmf" ) )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 98
Joined: Mon Jan 23, 2006 09:34 AM
PREVIEW PROBLEM
Posted: Fri Mar 16, 2007 09:58 PM

But how can i include this new function in my library?
Thanks

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
PREVIEW PROBLEM
Posted: Sat Mar 17, 2007 06:34 AM

Modify source\classes\printer.prg, recompile it and replace it into Five.lib

Alternatively you may link the resulting OBJ as another OBJ of your application instead of replacing it into the library

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion