Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
SDI form/ print preview in window outside form?
Message
De
16/10/2012 20:14:47
Luis Navas
Independent Consultant
Auckland, Nouvelle Zélande
 
 
À
16/10/2012 20:08:37
Jill Derickson
Software Specialties
Saipan, CNMI
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Database:
Visual FoxPro
Divers
Thread ID:
01555134
Message ID:
01555143
Vues:
73
You are welcome!

>Luis, thank you SOOOO much!
>
>That works perfectly.
>
>Thanks to you and the UT!
>
>J
>
>>Hi Jill, this is what I am using to achieve the same:
>>
>>
>>Local oPreview, oListener
>>Do (_ReportPreview) With oPreview
>>oPreview.TopForm = .T.
>>oListener = NewObject("ReportListener")
>>oListener.ListenerType = 1 && preview
>>oListener.PreviewContainer = m.oPreview
>>Report Form stock_rpl Object oListener
>>oListener.CommandClauses.Prompt = .T.
>>oListener.PreviewContainer.oForm.WindowState = 2 
>>
>>
>>Cheers,
>>
>>Luis
>>>Hi,
>>>
>>>I have an application with a single SDI form. The form is 320 x 971.
>>>
>>>Now i am adding a button to generate a report, and want the print preview to be outside the form, to display a full screen for the user.
>>>
>>>I used the following to generate the report:
>>>
>>>
>>>     DEFINE WINDOW DBWindow AT 1,1 Size 40, 120 TITLE "Details" IN DESKTOP CLOSE FLOAT GROW
>>>     REPORT form DropBoxRevenueAndGRDetails.FRX PREVIEW WINDOW DBWindow
>>>
>>>
>>>And it kind of works when i run the screen directly in VFP.
>>>
>>>But when i generate the exe and run it from there, "nothing happens" (the report is not displayed).
>>>
>>>The report is generated fine, if the code is just:
>>>
>>>
>>>     REPORT form DropBoxRevenueAndGRDetails.FRX PREVIEW
>>>
>>>
>>>but it displays inside my small 320 x 971 window.
>>>
>>>is there a way i can display the report in a large size?
>>>
>>>Thanks for any input!
>>>
>>>J
I never forget a face, but in your case I will make an exception :-)
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform