banniere

Le portail francophone de la géomatique


Toujours pas inscrit ? Mot de passe oublié ?
Nom d'utilisateur    Mot de passe              Toujours pas inscrit ?   Mot de passe oublié ?

#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.

 

Pied de page des forums

Powered by FluxBB