I've been having grief with TOP LEVEL FORM and READ EVENTS. Here's a summary of what I have and what's been happening. I haven't included everything, but hopefully what I have included is sufficient. Is there someone who can point me in the right direction?
** The MAIN program calls the first form (CRONTAB) and starts the events processing. There are three buttons on CRONTAB, Setup, Start, and Quit. Start is disabled until the second form (PROCESS_SET) has been run. Once PROCESS_SET has been run, the user can click on Start to activate the monitoring process. The problem is that clicking on Setup in CRONTAB does not bring up the SET_PROCESSING screen, but the 'Start' button is enabled as if it had been opened, had values set, and closed. When I click on Quit, the CRONTAB window closes and then the PROCESS_SET screen is active in the VFP system.
MAIN.PRG (Very simple - this is all there is to it!)
set status off
set century on
set talk off
do form crontab
read events
CRONTAB.SCX
showwindow=2 (As Top-Level Form)
autocenter=.T.
CRONTAB.INIT
_screen.visible=.f. (To suppress the main FoxPro window)
CRONTAB.UNLOAD
clear events
CRONTAB.COMMAND1 (Setup)
do form process_set
CRONTAB.COMMAND2 (Quit)
thisform.release
SET_PROCESSING.SCX
alwaysontop=.t.
autocenter=.t.
windowtype=1 (modal)
Steve
** The MAIN program calls the first form (CRONTAB) and starts the events processing. There are three buttons on CRONTAB, Setup, Start, and Quit. Start is disabled until the second form (PROCESS_SET) has been run. Once PROCESS_SET has been run, the user can click on Start to activate the monitoring process. The problem is that clicking on Setup in CRONTAB does not bring up the SET_PROCESSING screen, but the 'Start' button is enabled as if it had been opened, had values set, and closed. When I click on Quit, the CRONTAB window closes and then the PROCESS_SET screen is active in the VFP system.
MAIN.PRG (Very simple - this is all there is to it!)
set status off
set century on
set talk off
do form crontab
read events
CRONTAB.SCX
showwindow=2 (As Top-Level Form)
autocenter=.T.
CRONTAB.INIT
_screen.visible=.f. (To suppress the main FoxPro window)
CRONTAB.UNLOAD
clear events
CRONTAB.COMMAND1 (Setup)
do form process_set
CRONTAB.COMMAND2 (Quit)
thisform.release
SET_PROCESSING.SCX
alwaysontop=.t.
autocenter=.t.
windowtype=1 (modal)
Steve