Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Simple READ EVENTS question
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00095596
Message ID:
00095761
Views:
19
>John,
>
>It sounds like you've got the other forms tied to the lifetime of a memvar that's going out of scope then the method ends and taking the form with it. You can simply DO FORM AForm. Show us the code you are using to launch the child forms.
>
>>The app I've developed is started with a main.prg that call my "main form" which is modeless and showWindow is set to in screen. I issue a READ EVENTS after calling this for to start event processing. The remaining forms that are instanciated throughout the app are all modal type. Now I want to make them modeless so I can create custom menus for each form. The problem I have now is that when I call one of these forms that I changed from Modal to Modeless, The zoom on by and don't respect event processing. What is the correct way to call these modeless forms so they stop for event processing. Do I need to put a READ EVENTS in after every DO FORM someform? or is only one READ EVENTS sufficient that I use in the main.prg.


Hi David, thanks for responding.
Here is the code in my main.prg that calls the main for and issues READ EVENTS

******************************************
ON KEY LABEL alt+D keyboard dtoc(date())
SET DELETED ON

DO FORM sales
READ EVENTS &&stay in sales form until clear events issued (EVENT PROCESSING)
ON KEY LABEL F1
=SHUTDOWN()
SET STATUS BAR ON
SET FILTER TO
ON KEY LABEL ESCAPE
*******************************************

All other forms are being called with DO FORM someformname. The forms worked fine as modal, but changing them to modeless makes them go out of scope somehow.
BTW - not sure if this matters, but all of my forms are set to showwindow = 0, even the main form. The main form has always been modeless so I can manage things with my mainmenu system. Looking foreward to your response, and thanks again for taking time to help!!

John.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform