Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Preview in a desktop window
Message
From
23/10/2000 14:38:30
 
 
To
23/10/2000 05:23:35
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00431990
Message ID:
00433071
Views:
25
>Ok, but...
>
>After making the form appear on the desktop, the report still insists on appear within the FoxPro frame.
>
>Any ideas?
>
>By the way, its VFP5. Don't know if VFP6 would help.
>
>

Works the way I showed you in VFP6. I don't have VFP5 installed anymore, sorry.



>>>Sorry, but how does that from what I've done?
>>>
>>>How do you create a desktop form?
>>>
>>
>>All you've done is modify the main VFP screen. You need to create a form object and put your preview in in it.
>>
>>oForm = CREATEOBJECT("Form")
>>oForm.WindowState = 2
>>oForm.Caption = "Whatever you need to see"
>>oForm.Show()
>>REPORT FORM (FRXName) WINDOW oForm.Name PREVIEW
>>oForm.Release()
>>
>>
>>>>Hi Jason,
>>>>Create a DeskTop Form. Size it as required. Instantiate it, but don't show it.
>>>>REPORT FORM (FRXName) WINDOW DeskTopForm.Name
>>>>
>>>>>The minimum monitor resolution we support is 800x600, so I like to develop our simple little apps to maximise to this screen resolution. All is fine except for the reports. How can I use all the screen for the report if your have a greater resolution?
>>>>>
>>>>>According to the help, the following code should work - but it doesn't. It defines a window in the desktop but displays the report within the FoxPro frame.
>>>>>
>>>>>
>>>>>Any ideas or suggestions would be appreciated
>>>>>
>>>>>
>>>>>********************************
>>>>>on shutdown clear events
>>>>>
>>>>>with _screen
>>>>> .autocenter = .t.
>>>>> .windowstate = 0
>>>>> .top = 200
>>>>> .left = 500
>>>>> .height = 500
>>>>> .width = 500
>>>>>endwith
>>>>>
>>>>>=inkey(1)
>>>>>define window WindowName1;
>>>>> from 0, 0 to 25, 25;
>>>>> in desktop
>>>>>
>>>>>activ window WindowName1
>>>>>=inkey(1)
>>>>>
>>>>>use in select("Cursor1")
>>>>>create cursor Cursor1 ( Field1 c (1))
>>>>>append blank
>>>>>replace Field1 with "A"
>>>>>
>>>>>set safety off
>>>>>create report report1 from Cursor1 fields Field1
>>>>>set safety on
>>>>>
>>>>>report form report1 preview window WindowName1 noconsole
>>>>>
>>>>>deactivate window WindowName1
>>>>>
>>>>>on shutdown clear events
>>>>>read events
>>>>>on shutdown
>>>>>
>>>>>********************************
Fred
Microsoft Visual FoxPro MVP

foxcentral.net
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform