Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
Problem exiting program
Versions des environnements
Hello All,
I've a problem which probably requires a very simple solution. I've a form with the following code attached to an exit button:
LOCAL nResponse
nResponse=MESSAGEBOX('Do you want to quit this application?',4+32,'Confirm action')
IF nResponse=6
CLEAR EVENTS
ENDIF
THISFORM.Release
RETURN
In my MAIN.prg I have;
if blah()
DO myform
READ EVENTS
ELSE
* DISPLAY ERROR MESSAGE
ENDIF
Why doesn't this properly work? Executable doesn't work either. Execution of 'blah()' works fine, however the form doesn't load.
TIA,
Vernon
Suivant
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