Programmation d'une table avec un selecteur

Bonsoir à tous
j'ai une table avec une colonne select (COL_Sel)
mon soucis es que je cocher une case qui correspond a une ligne et dans le même temps décocher toutes les autres case.
voici comment je procède actuellement :

Code:

---

1 2 3 4 5 6 7 8 9

POUR TOUTE LIGNE DE TABLE_REQ_impbiens_inv //decocher toutes les autres lignes TABLE_REQ_impbiens_inv[TABLE_REQ_impbiens_inv].COL_Sel = Faux FIN   //cocher ma ligne en question TABLE_REQ_impbiens_inv[TABLE_REQ_impbiens_inv].COL_Sel = Vrai

---

Le soucis es que a la première coche de ma ligne, je n'ai rien, au deuxième clique ça marche. Donc il faut double clique pour que ça marche.

Quelqu’un serait déjà passer par la avec une méthode plus fluide en seule coche ?

Merci pour vos retours de solution

Bonjour,

En Windev, je fais plutôt un truc du genre :

Code:

---

1 2 3 4

nLigneEnCours est entier = tableSelect(Matable) Pour i = 1 _a_ Matable..occurrence Matable[i].Col_Sel = (i = nLigneEnCours) Fin

---

Bonjour @ frenchsting

Merci de t’être pencher sur mon soucis.

Voici les modifications que j'ai apporter :

Code:

---

1 2 3 4 5 6

//A chaque modification de COL_Sel (serveur) nLigneEnCours est entier = TableSelect(TABLE_REQ_impbiens_inv) POUR i = 1 _À_ TABLE_REQ_impbiens_inv..Occurrence TABLE_REQ_impbiens_inv[i].COL_Sel = (i = nLigneEnCours) FIN

---

Mais j'ai toujours le même problème, il faut me faut cliquer deux fois pour que la case soit cochée :oops:

Pièce jointe 667470

Merci

:lol::lol::lol::lol: j'avoue que je suis vraiment fatigué, j'ai copié coller sans regarder:
voici la correction qui malheureusement coche toutes les lignes :

Code:

---

1 2 3 4 5

nLigneEnCours est entier = TableSelect(TABLE_REQ_impbiens_inv) POUR i = 1 _À_ TABLE_REQ_impbiens_inv..Occurrence TABLE_REQ_impbiens_inv[i].COL_Sel = i FIN

---

je continu donc de chercher ! Merci a tous

Bonjour,

Ton code fonctionne mais il est sémantiquement incorrect. Si tu fais :

Code:

---

1 2 3 4 5 6 7 8

nLigneEnCours est entier = TableSelect(TABLE_REQ_impbiens_inv) POUR i = 1 _À_ TABLE_REQ_impbiens_inv..Occurrence SI i = nLigneEnCours ALORS TABLE_REQ_impbiens_inv[i].COL_Sel = vrai SINON TABLE_REQ_impbiens_inv[i].COL_Sel = faux FIN FIN

---

Bonsoir @frenchsting

Après plusieurs tests je viens de me rendre compte que :

Code:

---

1 2	nLigneEnCours est entier = TableSelect(TABLE_REQ_impbiens_inv) Trace(nLigneEnCours)

---

me donne -1 :calim2: a la première coche d'une case

Ensuite il faut clique deux fois sur la même case pour la cocher. j'avoue que je comprend plus rien :roll:
Je pense que vais passer a un bouton dans une champ conteneur.

Merci

Bonjour,

J'i une question : Où est ton code ? Sélection de ligne ? Entrée en saisie ? Sélection interrupteur ?...

Citation:

---

Envoyé par frenchsting

Bonjour,

J'ai une question : Où est ton code ? Sélection de ligne ? Entrée en saisie ? Sélection interrupteur ?...

---

Dans la colonne de la table, je choisis interrupteur , ensuite je copie le code dans :
A chaque modification de Col_sel (nom du champ de ma table, champ de type interrupteur) (Table_REQ_imp)(serveur)

Pièce jointe 667703

Merci

Bonjour,

Test à faire car je n'ai pas WB : dans le code de l'entrée dans la ligne de la table, tu mémorises l'état de la case à cocher (une variable globale à la page est nécessaire) :

Code:

---

1 2	gnLigneEnCours est entier = TableSelect(TABLE_REQ_impbiens_inv) gb_ValeurCse est booléen = TABLE_REQ_impbiens_inv[nLigneEnCours].col_Sel

---

Et dans le code de modification de col_sel

Code:

---

1 2 3 4 5 6 7

POUR i = 1 _À_ TABLE_REQ_impbiens_inv..Occurrence SI i = gnLigneEnCours ALORS TABLE_REQ_impbiens_inv[i].COL_Sel = (TABLE_REQ_impbiens_inv[nLigneEnCours].col_Sel = vrai) SINON TABLE_REQ_impbiens_inv[i].COL_Sel = faux FIN FIN

---

Bonjour,

Je viens tester avec gnLigneEnCours comme variable globale.
Il faut toujours cocher deux fois.
Je pense que je vais abandonner.

Merci pour ton aide