Combo table par programmation

Bonjour,

Je viens de découvrir les combo dans les table, mais je n'arrive absolument pas à l'utilisées ...

Je me demandais si vous pouviez m'aider ?

Alors tout simplement, j'aimerai, par programmation, remplir le champ combo de ma table.

Pour le moment, après avoir cliquer sur un boutton (je suis en phase de test) je fait (comme suggéré dans l'aide) :

Code:

---

TableAjoute(TABLE_Option)

---

et pour remplir ma combo dans ma table :

Code:

---

1 2	ListeAjoute(TABLE_Option.COL_Code_option, "test 1") ListeAjoute(TABLE_Option.COL_Code_option, "test 2")

---

Mais rien ne se passe. ma combo est vide.
Auriez-vous une idée ?

Bonjour,

Personnellement j'utilise ListeAjoute() avec des tabulation (TAB) pour séparer les colonnes de la table.

Code:

---

1 2 3 4

POUR i =1 A 5 ListeAjoute(Combo_Table,"Hello"+i +TAB+ "World"+i) FIN

---

Pour remplir ton combo par programmation tu dois utiliser
ListeAjoute dans la partie declaration globals de ton projet.

Tant qu'on y est, mon problème vient peut être de la :

Est-ce qu'il est possible pour chaque ligne de la colonne type combo,
d'avoir dans chaque ligne des valeur différentes dans les combo ?

Citation:

---

Envoyé par answer27

Pour remplir ton combo par programmation tu dois utiliser
ListeAjoute dans la partie declaration globals de ton projet.

---

ListeAjoute() peut être appelé de n'importe où (ou presque ;)).
Pas besoin d'aller dans le code du projet !

Je précise que ListeAjoute() prend seulement le nom de ta combo en premier paramètre.

Donc pour insérer une ligne :

Code:

---

ListeAjoute(NomDeLaCombo, "Test Colonne 1" + TAB + "Test colonne 2")

---

Citation:

---

Envoyé par draco951

Tant qu'on y est, mon problème vient peut être de la :

Est-ce qu'il est possible pour chaque ligne de la colonne type combo,
d'avoir dans chaque ligne des valeur différentes dans les combo ?

---

Je ne serais pas t'aider pour les valeurs differentes à chaque lignes.

Un exemple pour remplir par programmation un combo dans une table :

Code:

---

1 2 3 4 5

ListeAjoute(nomtable.nomcolonne,"valeur1"+gLien(1)) ListeAjoute(nomtable.nomcolonne,"valeur2"+gLien(2)) ListeAjoute(nomtable.nomcolonne,"valeur3"+gLien(3)) ListeAjoute(nomtable.nomcolonne,"valeur4"+gLien(4))

---

Citation:

---

Envoyé par draco951

Tant qu'on y est, mon problème vient peut être de la :

Est-ce qu'il est possible pour chaque ligne de la colonne type combo,
d'avoir dans chaque ligne des valeur différentes dans les combo ?

---

Je ne comprend pas la question...

Tu peut bien évidement avoir des valeurs différentes dans tes colonnes.
Tu peut paramétrer la colonne a afficher lors de la sélection d'une ligne de la combo dans "Description\Contenu"

EDIT :
Je viens de me rendre compte que tu parle de combo dans une table et pas l'inverse comme l'indique ton titre !

Aucune de vos 2 méthode ne fonctionne, ma combo dans ma table est toujours vide.

Y à-t-il une option bien spécifique dans la description à régler ?

Ma colonne est bien de type combo
Dans les détail, je suis en paramètre :

*combo avec saisie
* saisie assistée

Dans contenu, je suis en :

*Remplissage par programmation

Milles excuse pour la confusion.

Donc, j'ai bien une table avec une des mes colonne dans ma table, de type 'combo'

Citation:

---

Envoyé par draco951

Aucune de vos 2 méthode ne fonctionne, ma combo dans ma table est toujours vide.

Y à-t-il une option bien spécifique dans la description à régler ?

Ma colonne est bien de type combo
Dans les détail, je suis en paramètre :

*combo avec saisie
* saisie assistée

Dans contenu, je suis en :

*Remplissage par programmation

---

Alors dans la description de la table, onglet Contenu, tu as coché "Par programmation".
As-tu préalablement essayé de remplir avec "Par variable" ?

Du coup je pense avoir compris ce que tu veux :

Code:

---

1 2 3 4 5 6 7 8 9 10

nLigne est un entier   nLigne = TableAjouteLigne(MaTable, "Test", "Bonjour") ListeAjoute(MaTable[nLigne].Col_Combo, "Valeur1") ListeAjoute(MaTable[nLigne].Col_Combo, "Valeur2")   nLigne = TableAjouteLigne(MaTable, "Hello", "World") ListeAjoute(MaTable[nLigne].Col_Combo, "Test3") ListeAjoute(MaTable[nLigne].Col_Combo, "Test4")

---

Le code doit remplir 2 lignes d'une table ayant 3 colonnes (les 2 premières de type Texte, et la 3ème de type Combo)
Dans la combo de la première ligne tu as les valeurs "Valeur1" et "Valeur2"
Et dans la combo de la 2eme ligne tu as les valeurs "Test3" et "Test4"

Non, pas par variable.
J'ai essayé par fichier/Requête mais, même problème rien ne s'affiche.

Quand tu dis de faire un :

Citation:

---

ListeAjoute dans la partie declaration globals de ton projet

---

C'est possible ? si ma table n'est pas encore initialisée ? je ne comprend pas trop comment faire la.

Medeva ?

j'y avais pensé, mais il me sort l'erreur (que je trouve très curieuse d'ailleur) :

Code:

---

1 2	Que s'est-il passé ? Commande invalide pour le champ car ce n'est ni une liste, ni une table, ni une combo.

---

Et pourtant, la colonne de la table sur laquelle je fait mon ajout est bien de type combo.

Dans description de la table onglet Liaison, coche Mono-fichier selectionne bien "Aucun".
Et dans l'onglet Contenu coche onglet "par variable" rétabli tout a aucun et recoche "par programmation".
J'ai eu ce probleme, car windev gardé en memoire les valeurs précédentes des "par variable" meme si tu cocher "par programmation"

Moi j'ai une table "TABLE_Gtabttableau" comportant une colonne combo "Action".
Dans le code du projet global j'ai rempli le combo par programmation avec :

Citation:

---

ListeAjoute(TABLE_GtabTTableau.Action,"Rien"+gLien(1))
ListeAjoute(TABLE_GtabTTableau.Action,"Remplacer par un caractère"+gLien(2))
ListeAjoute(TABLE_GtabTTableau.Action,"Remplacer par un espace"+gLien(3))
ListeAjoute(TABLE_GtabTTableau.Action,"Supprimer"+gLien(4))

---

Je viens de vérifier et tous était bien défini sur Aucun.

Alors, j'ai une petite question, quand tu parle de :

Citation:

---

Dans le code du projet global j'ai rempli le combo par programmation avec....

---

serais tu me citer exactement le nom de l'évenement dans lequel tu va mettre ce code ?

J'ai beau essayer, rien n'y fait, j'ai toujours ma combo dans ma table vide.

Autre question :

A quel moment va-tu ajouter une ligne dans la table ? Toutes les lignes auront les même valeurs dans la combo alors je supose ?


PS : Je reviens à 13 heure, il est l'heure d'aller manger :mrgreen:

C'est bon j'ai compris (grâce à un collègue) le fonctionnement. Il faut que la colonne de type combo soit obligatoirement en saisie. Après tu rempli comme ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

nLigne est un entier   nLigne = TableAjouteLigne(Table1, "Test", "Bonjour") Table1[nLigne].Colonne3..Contenu = [ Test1 Test2 ]   nLigne = TableAjouteLigne(Table1, "Hello", "World") Table1[nLigne].Colonne3..Contenu = [ Hello1 Hello 2 ]

---

A noté que

Code:

---

1 2 3 4

Table1[nLigne].Colonne3..Contenu = [ Hello1 Hello 2 ]

---

peut aussi s'écrire :

Code:

---

Table1[nLigne].Colonne3..Contenu = "Hello1" + RC + "Hello 2"

---

Citation:

---

Envoyé par MeDeVa

C'est bon j'ai compris le fonctionnement. Il faut que la colonne de type combo soit obligatoirement en saisie. Après tu rempli comme ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

nLigne est un entier   nLigne = TableAjouteLigne(Table1, "Test", "Bonjour") Table1[nLigne].Colonne3..Contenu = [ Test1 Test2 ]   nLigne = TableAjouteLigne(Table1, "Hello", "World") Table1[nLigne].Colonne3..Contenu = [ Hello1 Hello 2 ]

---

A noté que

Code:

---

1 2 3 4

Table1[nLigne].Colonne3..Contenu = [ Hello1 Hello 2 ]

---

peut aussi s'écrire :

Code:

---

Table1[nLigne].Colonne3..Contenu = "Hello1" + RC + "Hello 2"

---

---

Je confirme , ca fonctionne bien ! :ccool:

Arg, zut medeva, j'y croyais dur comme fer que ca allait marcher mais malheureusement, Il m'ajoute une valeur dans le text de la combo ("test") puis 2 colonne à coter il m'ajoute "bonjour"

En gros, quand je clique sur la combo de la table, le menu déroulant n'apparaît toujours pas.

Bon, la bonne nouvelle, ca fonctionne avec ton idée Medeva, merci :ccool:

Mais pas sur mon projet ... :cry:
J'ai essayé sur un projet test et ca fonctionne, maintenant, le tout est de trouver pourquoi cela ne fonctionne pas sur le mien.

En tout cas, un grand merci à tous les 2, votre aide m'a été très précieuse :ccool:

Merci beaucoup et à charge de revanche :zoubi:

Je viens de trouver le problème de mon projet :

La colonne combo était bien réglée, medeva, ton code fonctionne bien
Dans la descriptions de la table(je précise, la table, pas la colonne combo), j'étais réglé dans l'onglet "IHM" :

Citation:

---

Sélection (sans saisie)

---

Alors qu'il faut mettre :

Citation:

---

En saisie

---

Cela fonctionne maintenant impéccable, et juste comme j'en avais besoin.

Encore une fois, merci :ccool: