Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Custom Report Listener
Message
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Title:
Custom Report Listener
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP
Network:
Windows 2003 Server
Database:
MS SQL Server
Miscellaneous
Thread ID:
01425975
Message ID:
01425975
Views:
98
Hi everybody,

I noticed a problem with the reports in our application.

We have this code
loListener = NEWOBJECT('IOListener_Directives','IOListener.vcx')
loListener.LISTENERTYPE = 1
and then
REPORT FORM oRegistry.ReportDir + "PartsOrderGridReport" OBJECT loListener TO PRINTER PROMPT PREVIEW
I looked into the code in IOListener_Directives class, it has lots of complex code with references to FRX and GdiPlus.

Anyway, the problem is that pressing ESC on the preview screen does nothing.

I'm not sure what to do about it and how to troubleshoot.

Any ideas of how to return the ESC behavior or where to look for the problem?

Thanks in advance.

I found also this
* Purpose:        	Use this code to run reports maximized when reportbehavior=90.
* Taken from http://www.levelextreme.com/wconnect/wc.dll?LevelExtreme~2,41,17,965887

*------------------------------------
* A Customised ReportPreview Factory.
* _REPORTPREVIEW = <this program>
*------------------------------------
LPARAMETER pcRef

DO HOME()+"ReportPreview.App" WITH  pcRef
pcRef.SetExtensionHandler( NEWOBJECT("PreviewExtension") )
RETURN

DEFINE CLASS PreviewExtension AS CUSTOM
	PROCEDURE SHOW( iModal )
		THIS.PreviewForm.ZOOMLEVEL=5 && 100%
		THIS.PreviewForm.TOOLBAR.DOCK(0)
		THIS.PreviewForm.WINDOWSTATE = 2
	ENDPROC

	PROCEDURE AddBarsToMenu( cPop, iNext )
	ENDPROC

	PROCEDURE HandledKeyPress( nKey, nMod )
	ENDPROC

	PROCEDURE PAINT()
	ENDPROC

	PROCEDURE RELEASE()
	ENDPROC
ENDDEFINE
Could it be the problem?
If it's not broken, fix it until it is.


My Blog
Reply
Map
View

Click here to load this message in the networking platform