Here's what I'm trying to do but I can't get it to work:
1. Run an applicaton without the main VFP Window
2. Run reports with a preview option
Seems simple enough, but I can't get it to work.
In Config.FPW
SCREEN=OFF
---------------
With the command REPORT FORM PREVIEW, nothing shows up because it is trying to print to the _SCREEN
-------------------
I tried this:
DEFINE WINDOW ppreview FROM 1, 1 TO 20, 60 GROW FLOAT SYSTEM ZOOM IN DESKTOP
REPORT FORM PastDue PREVIEW WINDOW ppreview
and I get nothing again. No window shows up, it acts like it prints somewhere and program execution continues as if it had printed.
-------------
Then I tried creating a form with SHOWWINDOW=1 (or 2) with:
(created a form class with SHOWWINDOW=1 called ppform)
=PrevWind('Past Due Accounts')
REPORT FORM PastDue PREVIEW WINDOW wShowInq
wShowInq.Release()
FUNCTION PREVWIND
LPARAMETERS tcTitle
IF PCOUNT() = 0
tcTitle = 'Report Preview'
ENDIF
wShowInq = CREATEOBJECT('ppForm')
wShowInq.Name = 'wShowInq'
wShowInq.Caption = tcTitle
wShowInq.Show()
RETURN
With this code:
IF I give the Form Class ppForm property of DESKTOP=.T. and SHOWWINDOW=1 or 2, I get a blank Form and Print Preview prints to some other unknown window.
IF I change to DESKTOP=.F. then I get nothing to show on the screen, however, in the development environment it works.
Can anyone tell me how to get the Print Preview into a Window which shows up while SCFEEN=OFF?
TIA
-Randy Robinson
Para Systems, Inc.