Autorisation : Membre
Nb de messages : 88
Inscrit le : Dim 16 Sep 2012, 14:20
Posté le : Jeu 20 Sep 2012, 23:17
Salut à tous !
J'aimerais faire un menu Pause (Continuer/Quitter) lançable depuis n'importe quel programme, donc vous pouvez m'expliquer comment l'intégrer, surtout au niveau des labels.
Merci
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 20 Sep 2012, 23:37
Code
...
If ...
Menu("PAUSE","CONTINUER",1,"STOP",2
Lbl 1
...
Lbl 2
Code
Disp "1:","2:","3:"
Repeat K=94 // touche du 3
getKey->K
If K=93 // touche 2
Goto 2
If K=92 // touche 1
Goto 1
End
// ici c'est comme un Lbl 3
...
Lbl 2
...
Lbl 1
Code
1->A // exemple de paramètre pouvant être nécessaire pour que le programme Pause s'adapte au programme qui l'appelle
prgmPAUSE
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 21 Sep 2012, 0:04
le deuxième :
la boucle Repeat permet d'attendre la pression d'une touche (ou autre) tout en effectuant d'autres opérations(n'importe lesquelles et je n'ai pas montré cela dans l'exemple)
Cet exemple génère un menu artisanal, mais le plus important est l'ensemble de gotos qui permet de modifier l'itinéraire
remarque : utiliser des goto à l'intérieur de la boucle peut provoquer des bugs sur des Ends, surtout si ce code et ses labels sont à l'intérieur d'un boucle.
le troisième :
un programme nommé pause est utilisé en sous-programme par d'autres programmes, et je précise que le programme pause peut se comporter différemment selon les valeurs de certaines variables qu'il faut initialiser juste avant dans le programme qui veut faire pause.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
