Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form Created with Define Window
Message
From
06/06/2018 15:38:23
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
01660589
Message ID:
01660601
Views:
83
After read others responses I thought that maybe you could use a actual Form object (via Define Class RepWindow as Form ) instead of a Define Window RepWindow. They should be the same to VFP. Does anyone else have anything to add to this approach?

WAIT … I just tried this and am getting a C5 error on the REPORT FORM line
RepWindow=CREATEOBJECT("RepWindow")
RepWindow.show(2)

REPORT FORM RepWindow TO PRINTER PROMPT PREVIEW WINDOW RepWindow

RETURN

DEFINE CLASS RepWindow as Form
	caption = 'RepWindow'
	windowstate = 2
*	visible = .t.
ENDDEFINE
>Hi,
>
>I have the following code in my application that creates a window in which a report is previewed. Here is the code:
>
>DEFINE WINDOW RepWindow ;
>   FROM 1, 1 TO 20, 20 ;
>   TITLE cReportTitle SYSTEM 
>
>ZOOM Window RepWindow  Max
>
>WAIT CLEAR 
>
>REPORT FORM (cReportFrxName) TO PRINTER PROMPT  PREVIEW WINDOW RepWindow
>
>RELEASE WINDOW RepWindow	
>
>
>While user is previewing the report (at the line REPORT FORM above), a code in another place of the application scans all open windows, as such:
>
>lnForms = _screen.formcount
>	 
>FOR i = lnForms to 1 STEP -1
>
>     *-- try to release this form:
>     _screen.Forms(i).Release
>
>ENDFOR
>
>
>But the _screen.formcount does not seem to include the form created with the DEFINE WINDOW (above).
>
>How can I either include the form created with DEFINE WINDOW in the _screen.formcount? Or how can I check if this form created with DEFINE WINDOW exists?
>
>TIA
Greg Reichert
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform