Table avec cases à cocher

**dakota77** · 15/04/2011, 22h30

Bonjour,

Je souhaiterais placer des cases à cocher dans une table afin d’effectuer un traitement seulement sur les lignes qui sont cochées.

Après avoir lié la table à un fichier de l’analyse, j’insère une nouvelle colonne COL_SEL type interrupteur.

La table est en saisie, sélection multiple, la colonne "Interrupteur" est en saisie. Toutes les autres colonnes de la table sont en affichage.

Au lancement, les lignes peuvent être cochées.

Mais comment récupérer les lignes qui sont cochées ?

Le code suivant ne fonctionne pas car si deux lignes sont cochées : le premier info affiche toujours la valeur 1.
Et le deuxième info affiche toujours la valeur de la dernière ligne sélectionnée.

Code :

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

1
2
3
4
5
6
7
 
Info(TableSelectOccurrence(TAB_01)) //affiche la valeur 1 alors que 2 lignes sont cochées
 
POUR x = 1 _A_ TableSelectOccurrence(TAB_01)
	m=TAB_01[TableSelect(TAB_01,x)].COL_NOM
	Info(m)
FIN

D’avance merci.

**tatayo** · 16/04/2011, 09h04

Bonjour,
TableSelectOccurrence te renvoie le nombre de lignes SELECTIONNEES, et non de lignes dont ta colonne est cochée.
Si tu veux utiliser TableSelect et TableSelectOccurrence, tu dois utiliser une table Multi-Selection, et dans ce cas ta colonne ne sert plus à rien.

Sinon tu dois balayer la table et vérifier le contenu de ta colonne:

Code :

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

1
2
3
4
5
6
 
POUR TOUTE LIGNE DE TAB_01
   SI TAB_01.COL_SEL ALORS
      ... Ton code ...
   FIN
FIN

Tatayo.

**lololebricoleur** · 16/04/2011, 11h36

Pour moi, ton code est presque bon, tu n'utilise pas l'indice x comme je le fais habituellement. Essaye le code suivant :

Code :

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

1
2
3
4
5
6
7
8
1234567 Info(TableSelectOccurrence(TAB_01)) //affiche la valeur 1 alors que 2 lignes sont cochées
 
POUR x = 1 _A_ TableSelectOccurrence(TAB_01)
	si TAB_01.COL_Select[x] = vrai alors
		m=TAB_01.COL_NOM[x]
		Info(m)
	fin
FIN

**Guardian** · 16/04/2011, 15h24

Sauf que, comme le dit tatayo, pour parcourir une table il faut utiliser

Code :

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

POUR TOUTE LIGNE

et non

Code :

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

POUR x = 1 _A_ TableSelectOccurrence

**lololebricoleur** · 16/04/2011, 17h44

Slt ArielD,

Sauf ton respect de membre chevronné, les deux solutions fonctionnent.
Peut être la solution "pour toute ligne" est elle plus rapide, cela reste à prouver...

**tatayo** · 16/04/2011, 17h55

lololebricoleur => sauf ton respect de membre à l'essai (

), ton code ne fonctionne que dans un cas: une table multi-selection dans laquelle l'utilisateur sélectionne toutes les lignes... En effet, TableSELECTOccurrence renvoie le nombre de lignes sélectionnées, et non le nombre de ligne de la table. Dans le cas d'une table mono-selection, tu ne verifies au mieux que la première ligne...
Pour parcourir toute la table, il faut utiliser POUR TOUTE LIGNE ou TableOccurrence, au choix.

Après concernant la différence de performance entre les deux, m'est avis que c'est kifkif bourricot.

Tatayo.

**lololebricoleur** · 16/04/2011, 19h45

Respect, un point pour toi.

C'est effectivement la fonction tableoccurence.

Tu utilise plutôt laquelle toi ?

Je débute à tout point de vue, y compris pour essayer de filer un coup de main histoire de ne pas être qu'un "profiteur".

**tatayo** · 17/04/2011, 10h18

J'utilise plutôt POUR TOUTE LIGNE, je trouve la syntaxe plus claire.
D'ailleurs pour le parcours de tableau, la lecture de fichiers texte... j'utilise aussi POUR TOUT.

Le seul cas pour lequel je n'utilise pas POUR TOUT pour parcourir une table est quand je veux supprimer des lignes. Dans ce cas j'utilise une boucle TANTQUE en parcourant la table de bas en haut.

Tatayo.