DESCRIPTION.

La fonction FN_messagebox() permet d'afficher une boite formatée de message et de gérer la réponse de l'utilisateur.

SYNTAXE.

kchoix = FN_messagebox( titre , message , type )

REMARQUES.

titre doit être une chaine de caractères quelconque mais valide.titre  sera affiché dans la barre de titre de la boite de dialogue.

message doit être une chaine de caractères quelconque mais valide. message sera affiché comme intitulé au dessus du ou des boutons de la boite de dialogue.

type doit valoir : 

- 0, pour afficher uniquement le bouton OK dans la boite de dialogue ;

- 1, pour afficher les boutons OK et CANCEL (Annuler) ; 

- 2, pour afficher les boutons ABORT (Arrêter), RETRY (réésayer) et IGNORE (Ignorer) ; 

- 3, pour afficher les boutons YES (Oui), NO (Non) et CANCEL (Annuler) ; 

- 4, pour afficher les boutons YES (Oui) et NO (Non) ; 

- 5, pour afficher les boutons RETRY (réésayer) et CANCEL (Annuler) ; 

- plus grand que 5, pour afficher uniquement le bouton OK dans la boite de dialogue.

La fonction FN_messagebox() va retourner une valeur numérique, identifiant le bouton sur lequel l'utilisateur a cliqué pour fermer la boite de dialogue formatée. Cette valeur peut affecter une variable pour une utilisateur ultérieure, ou on pourra placer l'appel de la fonction FN_messagebox() comme expression à évaluer dans un test logique (IF ou ELSE IF), un bloc selon que (CASE ... OF), une boucle faire tant que (REPEAT / UNTIL) ou un boucle tant que (WHILE / ENDWHILE). La valeur retourné peut être :

- 1, si l'utilisateur a cliqué sur pour le bouton OK ;

- 2, si l'utilisateur a cliqué sur pour le bouton CANCEL (Annuler) ; 

- 3, si l'utilisateur a cliqué sur pour le bouton ABORT (Arrêter) ; 

- 4, si l'utilisateur a cliqué sur pour le bouton RETRY (réésayer)

- 5, si l'utilisateur a cliqué sur pour le bouton CANCEL (Annuler) ;

- 6, si l'utilisateur a cliqué sur pour le bouton YES (Oui) ;

- 7, si l'utilisateur a cliqué sur pour le bouton NO (Non).

Rappel : l'utilisation du module msgbox.bbc nécessite d'avoir chargé le module dlglib.bbc précédemment.

La procédure FN_messagebox() est importée depuis le module msgbox.bbc. 

EXEMPLE.

INSTALL @lib$ + "dlglib.bbc"

INSTALL @lib$ + "msgbox.bbc"

FOR ktype = 0 TO 9

PRINT "Type de boite : " ; ktype ;

kechelle = 1 + ( ktype * 0.3 )

kchoix = FN_messagebox( "TEST" , "Pour un test ..." , ktype )

PRINT " - valeur retournee pour votre choix : " ; kchoix

NEXT ktype

PRINT : PRINT "Test termine. Au revoir"

END