Boutons verticaux peuvent etre dessines avec la commande de texte vertical :
X> BUtton 3,135,35,10,42,0,0,1; [INk 0,0,0; Graphic Box 2,2,12,42; INk 6,0,0; Graphic Box 0,0,9,39; VText 0,0,'Bonjour!',2;][]
Icônes graphiques peuvent etre affichees grace a une image compacte contenue dans la banque de ressources. Elles peuvent etre affichees avec la commande UNpack, comme ceci :
X> [UNpack 0,0,1]
Des boutons complexes peuvent etre crees en utilisant une image compacte comme fond, combinee avec du texte et des graphismes Interface. Le fond peut aussi etre cree a partir d une ligne d images grace a la commande puissante LIne. Voici un exemple tout pret a charger :
LD> Load "AMOSPro_Tutorials:Tutorial/Interface/Simple_Requester.AMOS"
Modifier un bouton
La capacite d appeler une routine Interface chaque fois que l etat d un bouton change permet de creer des effets varies. La cle se trouve dans trois fonctions Interface : BPosition, BReturn et BChange.
BPosition
Fonction Interface : retourne la valeur actuelle d un bouton
valeur = BP
Apres avoir cree un bouton avec la commande BUtton, la position actuelle peut etre lue dans la routine de dessin en appelant la fonction BPosition. Elle retourne une valeur comprise entre minimum et maximum, selon l etat actuel du bouton.
Ceci permet de changer l apparence d un bouton selon son etat (par exemple, image differente pour bouton actif ou inactif).
Voici quelques exemples utilisant BPosition pour modifier l encre ou la couleur de fond :
X> BUtton 1,50,38,50,10,0,0,1; [INk 0,0,0; GraphicSquare 0,0,50,10; PRint 1,2,'Bouton',BPosition+5;][] affiche du texte surligné avec une encre differente X> BUtton 2,90,38,50,10,0,0,1; [INk BPosition 1+,0,0; change la couleur de fond du bouton quand selectionne GraphicBox 0,0,33,10; PRint 1,2,'Quitter',4;][ButtonQuit;]
Comme indique precedemment, on peut aussi afficher une image compacte depuis la banque de ressources.