Discussion :

[JustineJ]

Bonjour à tous,

Je me lance à poser une question sûrement bête mais je ne trouve pas de solution.
Je cherche à marquer plusieurs lieu sur une carte.
Pour cela j'utilise les fonction ggl ...

Les lieux à marquer se trouvent dans une liste donc je ne connaît pas le nombre d’occurrences.
Il faudrait donc que je crée x marqueurs et x coordonnées que j'aimerai nommer :
gglcoordonnées1, gglcoordonnées2, gglcoordonnées3, gglcoordonnées4, gglcoordonnées5 ....

J'ai écrit ce code (qui ne marche pas bien sûr) :

POUR TOUTE LIGNE i DE LISTE_Choix_Carto
Commune est une chaîne=LISTE_Choix_Carto..ValeurAffichée
SI HLitRecherche(Coordonnées,Nom,Commune)=Vrai ALORS
Latitude est un réel=Coordonnées.Latitude
Longitude est un réel=Coordonnées.Longitude
FIN
gglCoordonnées(i) est une gglCoordonnée
gglMarqueur[i] est un gglMarqueur

gglCoordonnées..Latitude = Latitude
gglCoordonnées..Longitude = Longitude

gglMarqueur..Latitude = gglCoordonnées..Latitude
gglMarqueur..Longitude = gglCoordonnées..Longitude

// Paramétrage des marqueurs
SI i=1 ALORS
gglMarqueur..Lettre = "A"
gglMarqueur..Couleur = RougeClair
SINON
SI i=j ALORS
gglMarqueur..Lettre = "A"
gglMarqueur..Couleur = RougeClair
SINON
gglMarqueur..Lettre = i
gglMarqueur..Couleur = BleuClair
FIN
FIN

FIN

Comment puis-je incrémenter mes coordonnées et marqueurs ?

Merci d'avance.

[basam95]

Salut,

Essaye plus simplement d'ajouter un compteur qui change lors du parcours

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
i est un Entier = 1
 
POUR TOUTE LIGNE DE LISTE_Choix_Carto..Occurrence
// Traitement
// ...
i++
FIN

A+

[jurassic pork]

Bonjour Justine,
ce que tu cherches à faire ressemble à une utilisation de tableau de gglCoordonnée et de gglMarqueur mais tu n'en as pas besoin avec le POUR TOUTE LIGNE. En guise d'exemple je te présente un code qui fait un peu la même chose que ce que tu veux faire : On a une liste avec des villes et leurs codes postaux ex 59000 LILLE, 62000 ARRAS etc ... et on va mettre sur une carte googlemap des marqueurs pour ces villes. La lettre A dans un fond rouge pour la 1ere et la dernière de la liste et une lettre sur du fond bleu clair qui s'incrémente pour les autres. Voici :

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
18
19
20
21
22
23
24
25
MonMarqueur est un gglMarqueur
gglParamètres est un gglParamètreCarte
Localisation est un gglCoordonnée
i est un entier = 1
POUR TOUTE LIGNE DE LISTE_Villes
	Localisation=GglAdresseVersCoordonnées(LISTE_Villes..ValeurAffichée)
	SI Localisation <> Null ALORS
	SI i = 1 OU i =  LISTE_Villes..Occurrence ALORS
	MonMarqueur..Lettre = Caract(65)  // 65 = "A"
	MonMarqueur..Couleur = RougeClair
    SINON
	MonMarqueur..Lettre = Caract(64 + i)  // 65 = "A"
	MonMarqueur..Couleur = BleuClair	
	FIN
	MonMarqueur..Latitude = Localisation..Latitude
	MonMarqueur..Longitude = Localisation..Longitude
	MonMarqueur..Taille = gglGrand
	Ajoute(gglParamètres..Marqueur, MonMarqueur)
    SINON
    Erreur("Google ne veut pas me donner les coordonnées de " + LISTE_Villes..ValeurAffichée)
	FIN
    i++
FIN
gglParamètres.Langue = "fr"
IMG_Carte = GglRécupèreCarte(883, 480, gglPlan, gglParamètres)

Ami calmant, J.P

[JustineJ]

Merci beaucoup, ça marche nickel !!!!

Je n'utilise pas GglAdresseVersCoordonnées parce que mes noms de ville ne sont pas standards et Google ne les trouverait pas mais je vais creuser cette fonction que je ne connaissais pas et qui m'a l'air bien pratique.

Merci encore.