Having problems figuring out how to release the extension handler.  If you
don't it remembers the settings removing the printer button on the toolbar
for other reports on the form.

The stpreview class has this in the release method,


        IF TYPE('This.stpreview') = 'O'
                This.stpreview.ExtensionHandler = .NULL.
                This.stpreview = .NULL.
        ENDIF

And this code is in the method for printing the report,

        mreport = " strpcredit "

*-- Using an extension handler
        local   loPreviewContainer, ;
                loReportListener, ;
                loExtensionHandler


SET CLASSLIB TO stndbred

*-- Create the preview container
        do (_reportpreview) with loPreviewContainer

*-- Invoke the Extension Handler
        loExtensionHandler = createobject('stpreview')

*-- Hook the Extension Handler to the preview container
        m.loPreviewContainer.SetExtensionHandler(m.loExtensionHandler)

*-- Create the Report Listener for the preview
        do (_reportoutput) with 1, loReportListener

*-- Assign the preview container to the listener
        m.loReportListener.previewcontainer = m.loPreviewContainer

*-- Run the report
        report form &mreport object m.loReportListener preview



thisform.refresh


I've tried numerous ways to release stpreview, but none have worked?


James E Harvey
Hanover Shoe Farms, Inc.
M.I.S./Corresponding Officer
Off: 717-637-8931
fax: 717-637-6766
email: [email protected]



_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/015301ca3c85$4aa143c0$dfe3cb...@com
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to