Page 1 of 1

PREVIEW PROBLEM

PostPosted: Sun Mar 11, 2007 6:57 pm
by patili
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

PostPosted: Mon Mar 12, 2007 6:15 pm
by Otto
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

PostPosted: Mon Mar 12, 2007 7:19 pm
by patili
Thanks
it is very usefull
Patrick

PostPosted: Mon Mar 12, 2007 8:39 pm
by Antonio Linares
Otto,

You can use:

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

PostPosted: Fri Mar 16, 2007 9:58 pm
by patili
But how can i include this new function in my library?
Thanks

PostPosted: Sat Mar 17, 2007 6:34 am
by Antonio Linares
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