[RESOLU]bug sub_menu

Dernière édition par silverman le Dim 25 Sep 2016 - 10:27, édité 3 fois

Bonjour à tous

Un message d'erreur apparait("sous-menu pas dans le menu") lorsque le numéro de sub_menu est supérieur à 37.
Un autre message d'erreur apparait("violation d'accès à l'adresse...") lorsque le numéro de sub_menu est supérieur à ???. Si on ajoute des lignes vides à la fin du source, la valeur de ??? augmente!

Voici un petit code pour reproduire ce bug:
Pour voir ce bug, Fichier--->Quitter

Code:: ' panoramic 0927i5

dim menu_start%,menu_next%,file_menu%,new_value%

label openfile,exit

new_value%=34 :' à partir de 34= erreur et 100= violation d'acces


' menu principal
inc_value()
menu_start%=new_value%
main_menu menu_start%

' sous-menu FICHIER
inc_value()
file_menu%=new_value%
sub_menu file_menu% : caption file_menu%,"Fichier" : parent file_menu%,menu_start%

' categorie dans le sous-menu fichier
inc_value()
menu_next%=new_value%
sub_menu menu_next% : caption menu_next%,"Ouvir" : parent menu_next%,file_menu% : on_click menu_next%,openfile
'
inc_value()
menu_next%=new_value%
sub_menu menu_next% : caption menu_next%,"Quitter" : parent menu_next%,file_menu% : on_click menu_next%,exit

END
openfile:
   wait 100
return

exit:
   message str$(menu_next%)
   terminate
return

sub inc_value()
   new_value%=new_value%+1
end_sub

EDIT: je viens de me rendre compte que ce bug a déjà été signalé ici, c'est bien, mais ça serais mieux de le poster dans la rubrique des bugs qui est réservé à cet effet

Salut Homme d’argent king

Le problème vient de TERMINATE qui joue toujours des mauvais tours.
Remplace TERMINATE par END ou vire-la carrément et tout rentra dans les rangs.
Cela n'empêche pas que le Bug est bel et bien présent!
C'est à Jack de tordre le cou une bonne fois pour toute à TERMINATE. affraid

» MENU + SUBMENU
» Pour une coche "résolu" RESOLU
» Variable(V$) (Résolu)
» var for next
» resulta incomplet [RESOLUT]