Treeview, SVP ! besoin d'aide !!!
Stagiaire WDF
Inscrit:
20/12/2005 14:22
De Maine et Loire
Post(s): 26
Bonjour,

Malgré les exemples fournis, je n'arrive pas à remplir un arbre a partir des plusieurs fichiers reliés par des liaisons.
Remplir l'arbre avec le nom des societes, pas de problemes
Ce que je n'arrive pas a comprendre c'est comment lui specifier d'afficher les contacts associés du fichier societe, et ce dans l'ordre d'appartenance!

Le code :

HLitPremier(Société,NomSociété)
HLitPremier(Contacts,Nom)
TANTQUE HTrouve()=Vrai
ArbreAjoute (Arbre1,"Annuaire"+TAB+Société.NomSociété+TAB+Contacts.Nom,aDéfaut,aDéfaut)
HLitSuivant(Société,NomSociété)
HLitSuivant(Contacts,Nom)
FIN

Structure des fichiers:
Fichier Société lié au Fichier Contacts par liaison 0.n->0.1

je me rends bien compte que mon code n'est pas bon car je ne fait que lister le fichier societe d'un coté et le fichier contacts de l'autre pour concatener tout ca, pas bon !
Le resultat ne se fait pas attendre, Mes contacts ne sont pas dans l'ordre d'appartenance par rapport aux societes !

Le résultat serai d'avoir la liste des contacts pour chaque société quoi …

Vous remerciant vivement de votre aide !

Cordialement, Arnaud

Contribution le : 20/12/2005 14:24
Créer un fichier PDF de la contribution Imprimer


Re: Treeview, SVP ! besoin d'aide !!!

Inscrit:
19/11/2002 12:20
Post(s): 390
Salut :)
Il faut procéder un tout petit peu différemment...
Utilisez la clef de liaison entre les fichiers société et contacts (NomSociété je suppose?):
HLitPremier(Société,NomSociété) 
HLitRecherchePremier(Contacts,NomSociété,Société.NomSociété) 
TANTQUE HTrouve(Contacts) 
   ArbreAjoute (Arbre1,"Annuaire"+TAB+Société.NomSociété+TAB+Contacts.Nom,aDéfaut,aDéfaut)  
   HLitSuivant(Contacts,NomSociété) 
FIN 
HLitSuivant(Société,NomSociété)


Enfin dans le style comme ça en fait pour chaque société vous cherchez les contacts de cette société et vous les affichez.

Contribution le : 20/12/2005 15:02
Créer un fichier PDF de la contribution Imprimer


Re: Treeview, SVP ! besoin d'aide !!!
Stagiaire WDF
Inscrit:
20/12/2005 14:22
De Maine et Loire
Post(s): 26
Arghhhhhh !!!!

MERCIIIIIIIIIIIIIIIIIIIII !!!!!!!!!!!!!!!!!!!!

Un grand merci !

Dire que je tourne comme une bourique depuis des heures ...

Bon faut dire que je suis pas un pro de la comprehension quant au language de dev, mais bon, je m'y ferai bien !
j'vais pas rester comme ca quoi !

Cela fonctionne, enfin.

Juste un truc, il affiche bien ce que je desire, juste qu'il ne m'affiche que la premiere societe avec ses contacts.

je voudrai pas paraitre pour un peu ...
mais comment faire pour qu'il continue sur tout le fichier societe ?

Merci !

Contribution le : 20/12/2005 16:14
Créer un fichier PDF de la contribution Imprimer


Re: Treeview, SVP ! besoin d'aide !!!
Bonjour,

HLitPremier(Société,NomSociété)
TANTQUE pas h.endehors 
 HLitRecherchePremier(Contacts,NomSociété,Société.NomSociété) 
 TANTQUE HTrouve(Contacts) 
   ArbreAjoute  (Arbre1,"Annuaire"+TAB+Société.NomSociété+TAB+Contacts.Nom,aDéfaut,aDéfaut)  
   HLitSuivant(Contacts,NomSociété) 
 FIN 
 HLitSuivant(Société,NomSociété)
FIN


suffisait de rajouter la boucle sur le fichier societe , je pense que lmane pensait que vous aviez compris

Contribution le : 20/12/2005 16:35
Créer un fichier PDF de la contribution Imprimer


Re: Treeview, SVP ! besoin d'aide !!!
Stagiaire WDF
Inscrit:
20/12/2005 14:22
De Maine et Loire
Post(s): 26
Un tres grand merci pour votre aide !

Cela fonctionne parfaitement.

Je ne suis que depuis peu sur cet Agl (2jours...) et je ne connais pas toutes les subtilitées du dev.
Pour dire !

Je suis vraiment ravi de l'aide aussi rapide que vous m'avez tous apporté.

Encore un grand merci, et je n'hesiterai pas a prendre conseils aupres du Forum !

Contribution le : 20/12/2005 16:46
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