The code below works fine, but the problem is the report sticks with this setting. When previewing the report with Report Form Customer Preview, it starts with page 1, does not displayes the toolbar, canvas is always set to 2, zoom level to 100 %. Even when i set ToolbarIsVisible = .t. in the code below i get the old style toolobar even when i have set reportbehaviour to 90. Any solution to this.
Thanks & Regards, Jitendra Shahani
Local loPreview, loListener
Do (_ReportPreview) With loPreview
With loPreview
.CurrentPage = 2 && Starts with Page 2
.ToolbarIsVisible = .F. && Doesn't displays the Toolbar
.CanvasCount = 2 && Displays 2 Pages at a time
.ZoomLevel = 5 && Set's Zoom to 100%
.Caption = 'Cusomizing Report Preview Container'
Endwith
loListener = Newobject('_ReportListener', Home() + 'FFC\_ReportListener')
loListener.ListenerType = 1
Report Form Customer Object loListener
_ReportPreview
Hot Topic
- editbox control snaps.
- How to using Microsoft Office Chart 10
- BUILD PROBLEM
- Importing ODBC tables into VFP 9.0
- Novice converting from VFP 5 to client/server using Microsoft SQL - HELP PLEASE!!!
- Reindexing a free table in .NET
- foxpro exe and dbf's, fpt's, bak's, tbk's, but now prgs etc.
- Office 2003 SP2 with Item Display Method
- Select Statement
- How to print a Table structure?
Visual FoxPro
- COPY TO Command
- How to access VFP popup errors?
- MSGraph.Chart.8 control
- foxpro *
- Additional fields in table exported to txt
- .exe does not stay open on desktop
- How to prevent VFP application from decompiled by Refox/Unfoxall?
- HOW TO START AUTOMATICALLY A .prg FILE!
- Writing our own code for the Print Button in the Report Preview toolbar VFP 9 using report listener.
- How to perform group by and order by AFTER union?
_ReportPreview
OwenSmith
MarekP
...
loListener = Newobject('_ReportListener', Home() + 'FFC\_ReportListener')
loListener.ListenerType = 1
loListener.PreviewContainer = loPreview
Report Form Object loListener