[Résolu] Clic sur image et survol
DSI WDF
Inscrit:
12/09/2004 11:07
De aude
Post(s): 279
Bonjour,
Petit soucis avec un champ image.
Je récupère les couleurs d'une image afin d'afficher au survol le nom de la ville et par clic afficher les disponibilités de personne sur cette ville.
Cela fonctionne pour 3 villes mais pas pour les autres (48 villes au total).
Voici les codes:
//Procédure locale
FONCTION FCOUL(Couleur)
// La valeur de filtre correspond au profil binaire hexa: FFF8F8F8
// (chaque couleur est filtrée des bits 40h, 1, 2 et 4)
RENVOYER ETBinaire(Couleur,0xFFF8F8F8) 


 
//clic sur Img1
//recuperation des coordonnées
X,Y sont des entiers
X = SourisPosX()
Y=SourisPosY()
// recupère la couleur sur l'image en couleur
ncouleur est un entier =dPixelCouleur(carte_couleur,X,Y)
SELON FCOUL(ncouleur)
	CAS FCOUL(RVB(255,153,0))
	CS=("NARBONNE")
	alim_liste_nom_table()
	CAS FCOUL(RVB(255,204,153))
	CS =("CARCASSONNE")
	alim_liste_nom_table()
	CAS FCOUL(RVB(6,55,96))
	CS=("GRUISSAN")
	alim_liste_nom_table()
	CAS RVB (104,17,2)
	CS="PORT LA NOUVELLE"
	alim_liste_nom_table()
	CAS RVB (164,164,255)
	CS="LAURE"
	alim_liste_nom_table()
	CAS RVB(55,55,255)
	CS="AZILLE"
	alim_liste_nom_table()
	CAS RVB(15,15,255)
	CS = "LAREDORTE"
	alim_liste_nom_table()
	CAS RVB (255,128,0)

//Au survol
//recuperation des coordonnées
X,Y sont des entiers
X = SourisPosX()
Y=SourisPosY()
// recupère la couleur sur l'image en couleur
ncouleur est un entier =dPixelCouleur(carte_couleur,X,Y)
SELON FCOUL(ncouleur)
	CAS FCOUL(RVB(255,153,0))
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle =("NARBONNE")
	CAS FCOUL(RVB(255,204,153))
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle =("CARCASSONNE")
	CAS FCOUL(RVB(6,55,96))
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle =("GRUISSAN")
	CAS RVB (104,17,2)
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle ="PORT LA NOUVELLE"
	CAS RVB (164,164,255)
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle ="LAURE"
	CAS RVB(55,55,255)
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle ="AZILLE"
	CAS RVB(15,15,255)
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle = "LAREDORTE"
	CAS RVB (255,128,0)
		MoiMême..CurseurSouris = curMain
		MoiMême..Bulle ="BIZE"


Merci de votre.
J'ai essayer avec d'autres couleurs, mais même probléme.

Contribution le : 06/12/2006 12:13

Edité par drcharly93 sur 6/12/2006 15:13:29
_________________
...
Créer un fichier PDF de la contribution Imprimer


Re: Clic sur image et survol
Animateur WDF
Inscrit:
19/01/2004 13:48
De www.sigmasys.fr
Post(s): 988
Bonjour,

C'est normal que ca ne fonctionne pas.
Dans un cas, vous faites :
CAS FCOUL(RVB(6,55,96))
(Vous utilisez "FCOUL(RVB ...")

Et dans un autre cas vous faites :
CAS RVB (104,17,2)
(Vous oubliez le "FCOUL..." )

Bon dév.,

Totof

Contribution le : 06/12/2006 13:10
_________________
[ Totof(Christophe LOGEL) réalise des développements spécifiques WinDev (Mon annonce wdforge), http://www.sigmasys.fr]
Créer un fichier PDF de la contribution Imprimer


Re: Clic sur image et survol
DSI WDF
Inscrit:
12/09/2004 11:07
De aude
Post(s): 279
oui effectivement, je m'en suis rendu compte.
Désolé,
Surmenage?????.............

Contribution le : 06/12/2006 13:56
_________________
...
Créer un fichier PDF de la contribution Imprimer



 Haut   Précédent   Suivant




Enregistrer votre réponse
CompteNom   Mot de passe   Authentification
Message:


Vous ne pouvez pas débuter de nouveaux sujets.
Vous pouvez voir les sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2