Annonce
#1 Mon 20 October 2003 13:59
- Celine Ronte
- Invité
bouton enfonce avec mapbasic
De: Celine Ronte
Bonjour a tous,
Je cherche a savoir si il est possible de creer un bouton avec mapbasic, qui une fois enfonce affiche une couche et reste enfonce. Et quand on reclick dessus efface cette couche ?
Merci pour votre aide et bonne journee,
Celine Ronte
#2 Sat 25 October 2003 18:35
- Sigeal
- Invité
Re: bouton enfonce avec mapbasic
De: Christophe DAMOUR
Bonjour,
Il faut d'abord creer un ToggleButton :
Create ButtonPad Essai As
ToggleButton
Icon 1
ID 1
Calling BoutonBascule
Puis le code permettant de gerer l'action selon qu'il est enfonce ou non :
'Variable globale permettant de conserver l'etat du bouton :
Global TEST_BOUTON As Logical
sub BoutonBascule()
if Not TEST_BOUTON then
'Mise a jour de la variable et affichage de la couche
TEST_BOUTON = True
Set Map Window FrontWindow()
Layer Couche Diplay Graphic
else
'Mise a jour de la variable et suppression de la couche
TEST_BOUTON = False
Set Map Window FrontWindow()
Layer Couche Diplay Off
end if
end sub
Ne pas oublier en outre de verifier l'existence de la couche.
Bon courage.
Christophe.
