Re: Concatenation
Posté par ChtiCok le 15/4/2005 16:14:31
Voila ce que j'ai fais :
Tu créait une fenetre vierge
Tu créait 2 champs Table (Table1 et Table2)
et une combo (Combo1)
Sur initialisation de la combo :
et sur Sélection d'une ligne dans Combo1 :
La ca fonctionne
PS : S'il n'y a rien dans table1 au départ c'est normal qu'il n'y ait rien dans la combo1 sinon il faut mettre le code sur 1 bouton et comme ca tu cliques dessus apres avoir renseigner les lignes de table1
Voila
Tu créait une fenetre vierge
Tu créait 2 champs Table (Table1 et Table2)
et une combo (Combo1)
Sur initialisation de la combo :
i est un entier
Valeur est une chaîne
//Pour que la table1 ne soit pas vide
TableAjoute(Table1,"Nico"+TAB+"Glo")
TableAjoute(Table1,"Toto"+TAB+"tat")
//Ajout dans la combo
POUR i=1 A TableOccurrence(Table1,toTotal)
Valeur=Table1[i][1]+" "+Table1[i][2]
ListeAjoute(MoiMême,Valeur)
FIN
et sur Sélection d'une ligne dans Combo1 :
//Ajout dans la table2
TableAjoute(Table2,Combo1..ValeurAffichée)
La ca fonctionne
PS : S'il n'y a rien dans table1 au départ c'est normal qu'il n'y ait rien dans la combo1 sinon il faut mettre le code sur 1 bouton et comme ca tu cliques dessus apres avoir renseigner les lignes de table1
Voila
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=2126&post_id=8877