Page 1 of 1

PREVIEW PROBLEM

Posted: 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

Posted: 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

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

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

You can use:

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

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

Posted: 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