A la place de cette
demande, je préfèrerais celle-ci : MESSAGE_EXIT_APPLICATION(T). Cette nouvelle commande serait à placer en début de source et ne concerne que le form 0.
Exemple:
- Code:
-
LABEL actions
rem configurer panoramic pour afficher un message de sortie
MESSAGE_EXIT_APPLICATION("Quitter l'application ?")
ON_CLOSE 0,actions
END
rem si l'utilisateur a cliqué sur 'no' faire:
actions:
...
RETURN
Dès que l'utilisateur effectuera un click sur la croix de fermeture, panoramic fera en interne:
- si T ="" alors quitter (comportement habituel)
- si T<>"" alors afficher un message_confirmation_yes_no(T). Si 'yes' cliqué alors quitter, sinon rester
Ces actions doivent être testées prioritairement, ainsi si l'utilisateur a cliqué sur 'no', un ON_CLOSE codé pourra être éxécuté normalement
Cette nouvelle commande ferait partie d'un groupe de commandes déjà existantes, et donc bien plus intuitive que cette
demande.