Discussion :

[legero]

Bonjour chers développeurs,

J’ai un champ « arbre » que j’ai rempli par programmation avec ce code :

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
 
POUR TOUT DOMAINES_ACTIVITES 
	SI Contient(DOMAINES_ACTIVITES.Type_P,gEnr_demande_SPS.ID_type,SansCasse) ALORS
		ArbreAjoute(ARBRE_Expertise, Majuscule(DOMAINES_ACTIVITES.ID_Domaine + " - " + DOMAINES_ACTIVITES.Libellé_Domaine), IMG_domaine2, IMG_domaine2,DOMAINES_ACTIVITES.ID_Domaine , aTriAlpha, "Domaines d'Activité")	             
 
		POUR TOUT CATEGORIES_ACTIVITES AVEC ID_Domaine= DOMAINES_ACTIVITES.ID_Domaine
			ArbreAjoute(ARBRE_Expertise, DOMAINES_ACTIVITES.ID_Domaine + " - " + DOMAINES_ACTIVITES.Libellé_Domaine   +TAB +  ...
			gPoliceGras(Vrai)+CATEGORIES_ACTIVITES.Ref_Categorie + " - " + CATEGORIES_ACTIVITES.Lib_Categorie,IMG_Categorie_F,IMG_Categorie_F,CATEGORIES_ACTIVITES.Ref_Categorie,aTriAlpha,"Catégories d'Activité")	
			POUR  TOUT EXPERTISES  AVEC Ref_Categorie= CATEGORIES_ACTIVITES.Ref_Categorie
				ArbreAjoute(ARBRE_Expertise, DOMAINES_ACTIVITES.ID_Domaine + " - " + DOMAINES_ACTIVITES.Libellé_Domaine +TAB +  ...
				gPoliceGras(Vrai)+CATEGORIES_ACTIVITES.Ref_Categorie + " - " + CATEGORIES_ACTIVITES.Lib_Categorie + TAB+ ...
				gPoliceItalique(Vrai)+ EXPERTISES.Num_Ref + "-"+EXPERTISES.Lib_Expertise,IMG_Expertise_F,IMG_Expertise_O,EXPERTISES.Num_Ref,aTriAlpha,"Expertises" )
 
			FIN
		FIN
	FIN
FIN

J’aimerai récupérer le code l’identifiant EXPERTISES.Num_Ref de la feuille sélectionner
J’ai utilisé ce code :

Code :

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

1
2
3
4
5
6
7
8
9
 
Ident est un entier
indice est un entier
 
Ident=ArbreRécupèreIdentifiant(ARBRE_Expertise,ArbreSelect(ARBRE_Expertise))
 
indice= ArbreRécupèreIndice(ARBRE_Expertise,ArbreSelect(ARBRE_Expertise))
 
Info(nIdent)

Mai j'ai en retour l'identifiant de la Racine de l’arbre en retour mais pas celui de la feuille sélectionnée.

Besoin d'aide (URGENT)

[tbc92]

Si tu fais info ( arbreselect(ARBRE_expertise)) , tu obtiens quoi ?
Selon la réponse, tu pourras voir un peu mieux où est l'erreur.

[legero]

le code

Code :

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

 info ( arbreselect(ARBRE_expertise))

donne effectivement le chemin de la feuille sélectionnée comme suit:

mai l'identifiant ne correspond pas.

[legero]

Si tu fais info ( arbreselect(ARBRE_expertise)) , tu obtiens quoi ?
Selon la réponse, tu pourras voir un peu mieux où est l'erreur.

le code

Code :

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

 info ( arbreselect(ARBRE_expertise))

donne effectivement le chemin de la feuille sélectionnée comme suit:

mai l'identifiant ne correspond pas.

[tbc92]

L'identifiant que tu obtiens, c'est toute la hiérarchie (le libellé correspondant à la racine + les libellés des différentes branches + le libellé de la feuille, tout ça séparé par TAB)
On a donc une première façon de procéder, c'est d'utiliser la fonction ExtraitChaine : ExtraitChaine ( ... ..., 1, tab, DepuisFin)Personnellement, je préfère nettement les tables hiérarchiques plutôt que les arbres, c'est plus facile à manipuler, et au pire, en faisant une table hioérarchique avec une seule colonne visible, on donne l'illusion à l'utilisateur qu'il travaille sur un arbre.
Ceci dit, en lisant la doc ici, je suggère ça :

Code :

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

1
2
3
i est un entier
i = arbre1
info (arbre1[i])