Information générale
Catégorie:
Codage, syntaxe et commandes
>>>>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
>>
>>Think's body
>>
>>I will Try it and give you some news
>>I'm sorry for the delay but i had to resolve some urgency
>>
>>Rocky Boy ...
>Thank's Very Much Guys
> it work's !!!
You're welcome!
Vlad
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement