General information
Category:
Coding, syntax & commands
>Hi guys,
>Do you ear about a bug or something else that when you did a clear events; the program return to execute the read events command instead of the next line
>
>EX
>
>MAIN.PRG
>
>App = createobject("application")
>READ EVENTS
>...
>
>in the menu QUIT
>IF App.Release()
> CLEAR EVENTS
>ENDIF
Check the TasTrade sample for one way of doing things.
What I do:
1. "READ EVENTS" is in oMyApp.Do()
2. In the Exit/Quit option of the menu:
if oMyApp.CleanUp()
Release oMyApp
endif
3. In oMyApp.CleanUp() I call QueryUnload for all forms. If all QueryUnload methods return .t.:
CLOSE DATA ALL
CLEAR EVENTS
and return .t.
It works fine. I never had your error since I'm using it (10 months).
Vlad
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only