#1 Sun 14 December 2008 18:42
- grumpy_kiki
- Juste Inscrit !
- Date d'inscription: 14 Dec 2008
- Messages: 1
pb creation de menu Mapbasic
Bonjour,
je cherche à créer un menu pour enregistrer avec le choix entre "oui" et "non", renvoyant soit à "enregistrer table" soit à rien.
j'ai créé des sous-menus mais je ne sais pas créer les boutons oui/non, je ne sais mettre qu'une note informative, ce qui ne sert rien.
Voici mon programme type :
Include "C:\Program Files\MapBasic\MAPBASIC.def"
Include "C:\Program Files\MapBasic\MENU.def"
Declare Sub Main
Declare Sub enregistrer
Declare Sub Fin
'-----------------------------------------------------
Sub Main
Create Menu "test" As
"enregistrer" calling enregistrer
Create Menu "essai" As
"essai" as "test"
Create Menu "kiki" As
"essai" As "essai",
"(-",
"Quitter" Calling Fin
Alter Menu Bar add "kiki"
End Sub
'--------------------------------------------------------
Sub enregistrer
Note "enregistrer?"
end sub
'---------------------------------------------------------
Sub Fin
End Program
End Sub
Merci de m'aider si vous avez une idée !
Hors ligne
#2 Sun 14 December 2008 20:35
- Maurice
- Membre
- Lieu: Montpellier
- Date d'inscription: 5 Sep 2005
- Messages: 5331
Re: pb creation de menu Mapbasic
Bonjour
J'ai un doute sur l'ergonomie de ce que vous envisagez, d'autant que tout ça existe déjà dans l'interface MI...
Sinon on arrive a un résultat minimum avec:
Include "MAPBASIC.def"
Include "MENU.def"
Declare Sub Main
Declare Sub enregistrer
Declare Sub Fin
'-----------------------------------------------------
Sub Main
Create Menu "kiki" As
"Enregistrer..." calling enregistrer,
"(-",
"Ne pas enregistrer..." Calling Fin
Alter Menu Bar add "kiki"
End Sub
'--------------------------------------------------------
Sub enregistrer
Run Menu Command 105 ' ou 106, ou 109...
end sub
'---------------------------------------------------------
Sub Fin
End Program
End Sub
Hors ligne