Bonjour à Tous,

Je commence la manipulation d'une image cliquable et je rencontre un problème.
Malgré l'aide WD, je n'arrive pas à maitriser le problème suivant:

1- J'ai créé une image
2- En fond d'image, j'ai inséré un plan
3- J'ai écrit le code suivant:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//TAILLE DE LA POLICE
liFontSize est un entier = 8
dDébutDessin(IMG_Image1)
// Déclaration de la couleur et du style par défaut des différents tracés
dStylo(Noir, 3)
dPolice("Arial",liFontSize,iNormal,0)
//PLAN DU CADASTRE
dRectangle(370,25,660,210, Transparent, Noir) //R-RECEP
dRectangle(660,25,690,120, Transparent, Noir)//R-BOU-PIK
dRectangle(555,260,660,350, Transparent, Noir)//R-CLI-PIK
dRectangle(455,260,555,305, Transparent, Noir)//R-BOU-RES
dRectangle(455,305,555,350, Transparent, Noir)//R-CLI-RES
dRectangle(250,170,370,250, Transparent, Noir)//R-BOU-PRE
dRectangle(250,90,370,170, Transparent, Noir)//R-CLI-PRE
//ZONES EXPEDITIONS
dRectangle(55, 70, 115, 130, Transparent, RougeFoncé) //R-EXPED-CLIENTS
dRectangle(175, 70, 115, 130, Transparent, RougeFoncé)//R-EXPED-BOUTIQUES

Jusqu'à là, cela fonctionne.

Mais je souhaite faire apparaitre le nom de la zone lorsque je clic dessus.
Et je n'arrive pas à trouver la commande adéquate; J'ai tenté ceci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
x, y sont des entiers
x = SourisPosX()
y = SourisPosY()
// Code de clic de IMAGE1
 
SI x > y ALORS
	LIB_Libellé1 = "R-EXPED-CLIENTS"
SINON
	LIB_Libellé1 = "R-EXPED-BOUTIQUES"
FIN
Mais je ne vois pas comment l'intégrer pour chaque zones dessinées

Par avance merci pour votre aide
Bonne journée