Manuel Amos Professional  Sommaire  Index

Menus


Le second type d utilisation de MENU$ definit un ensemble d options qui seront affichees dans la barre de menu verticale. Les parentheses apres MENU$ contiennent deux parametres, le premier est le numero du titre de menu sous lequel votre option doit etre affichee, suivi du numero d option que vous voulez installer dans la barre de menu verticale. Toutes les options sont numerotees de haut en bas en partant de 1. La chaine d option contient le nom de votre nouvelle option, et peut etre composee de n importe quel texte. Les lignes suivantes peuvent etre ajoutees a l exemple precedent :

E> Rem Le menu Action a une option
   Menu$(1,1)=" Quit " : Rem Mettre trois espaces apres Quit
   Rem Le menu Mouse a trois options
   Menu$(2,1)="Arrow " : Rem Mettre cinq espaces apres Arrow
   Menu$(2,2)="Cross-hair"
   Menu$(2,3)="Clock " : Rem Mettre cinq espaces apres Clock

Cela specifie votre liste d alternatives pour les menus "Action" et "Mouse". Avant que ce programme puisse etre execute, il doit d abord etre active.

MENU ON
instruction : activer un menu
Menu On

Utilisez cette commande pour initialiser le menu precedemment defini avec MENU$, et la barre de menu apparaitra lorsque le bouton droit de la souris est appuye. Pour activer l exemple precedent, ajoutez les lignes suivantes :

E> Menu On
   Wait Key

Activez le menu et ses options maintenant, et utilisez le bouton gauche de la souris pour repositionner la barre de titre. Maintenant que ce menu simple est actif, les options selectionnees doivent etre lues et rapportees au systeme.

Lecture d un menu simple

CHOICE
fonction : lire un menu
selection=Choice
numero titre=Choice(1)
numero option=Choice(2)

CHOICE retourne une valeur de -1 (vrai) si un menu a ete active par l utilisateur, sinon une valeur de 0 (faux) est retournee. Apres avoir teste l etat du menu, la valeur retenue par CHOICE est automatiquement reinitialisee a zero.

CHOICE(1) retourne le numero du titre qui a ete choisi.

Retour    Suivant
06.05.02