Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
More Print Preview stuff
Message
From
06/12/2006 17:03:14
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Title:
More Print Preview stuff
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01175420
Message ID:
01175420
Views:
53
Hi Everyone,

Trying to tame and improve print preview under VFP9. Searched msgs here to get some ideas. Following code works well but:

1) the preview window is a 2nd window inside the window specified (looks wierd)
2) you cannot close the preview window clicking on the "X" on the outermost window
IF .ilPreviewReportFirst

   STORE CREATEOBJECT("form") TO loPreviewWindow

   WITH loPreviewWindow
      .Width = 835
      .Height = 875
      .Caption = "Print Preview"
      .Show()
   ENDWITH

   STORE " PREVIEW IN WINDOW (loPreviewWindow.Name)" TO lcPreviewClause

   * this maximizes inner window
   KEYBOARD "{CTRL+F10}" PLAIN

ENDIF

REPORT FORM (.icTempFrxFileName) TO PRINTER &lcPrintDialogClause ;
&lcPreviewClause NOCONSOLE OBJECT loReportListener
Thanks,

Albert
Reply
Map
View

Click here to load this message in the networking platform