Discussion :

[jacquesprogram]

Bonjour,
je crée un tableau à 2 dimensions, que je remplis dans une boucle comme ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
nDim est un entier = TableOccurrence(TABLE_Rubriques)
tabCorrespondance est un tableau [nDim,2] chaînes
sRub1, sRub2 est une chaine
 
POUR TOUTE LIGNE DE TABLE_Rubriques
sRub1=TABLE_Rubriques.COL_Rubriques_du_fichier_importé
sRub2=tabCols[TABLE_Rubriques.COL_Rubriques_correspondantes_dans_la_base_de_données]
TableauAjouteLigne(tabCorrespondance,sRub1,sRub2)	
FIN

A la fin, le tableau est désespérément vide ! Pourtant sRub1 et sRub2 contiennent bien les chaines attendues.
Aucune erreur levée, TableauAjouteLigne ne renvoie pas -1 (testé) alors pourquoi mon tableau ne se remplit pas ?

[dsr57]

essaye avec la syntaxe la

Code :

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

POUR TOUT NomDeLaTable

Dans ton cas cela donnerais :

Code :

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

1
2
3
4
5
6
7
 
 
POUR TOUT TABLE_Rubriques
sRub1=TABLE_Rubriques.COL_Rubriques_du_fichier_importé
sRub2=tabCols[TABLE_Rubriques.COL_Rubriques_correspondantes_dans_la_base_de_données]
TableauAjouteLigne(tabCorrespondance,sRub1,sRub2)	
FIN

Tiens nous au courant

[DelphiManiac]

Je viens de faire un essai :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
tabCorrespondance est un tableau 0, 2 chaînes
 
sRub1, sRub2 est une chaîne
 
POUR i = 1 A 2
	sRub1=i
	sRub2=i*2
	TableauAjouteLigne(tabCorrespondance,sRub1,sRub2)	
FIN
Trace(TableauOccurrence(tabCorrespondance))
STOP

semble fonctionner, mais si au départ j'initialise le tableau à nDim, le début du tableau sera rempli de ndim entrées à vide.

Si le tableau est déjà dimensionné, il ne faut pas ajouter les lignes, mais modifier les lignes existantes.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
tabCorrespondance est un tableau 2, 2 chaînes
 
sRub1, sRub2 est une chaîne
 
POUR i = 1 A 2
	sRub1=i
	sRub2=i*2
	tabCorrespondance[i, 1] = sRub1
	tabCorrespondance[i, 2] = sRub2
FIN
Trace(TableauOccurrence(tabCorrespondance))
STOP

[jimmypage]

Salut,

Complètement d'accord avec Delphi !

Si tu dimensionne ton tableau au debut, tu ne peux plus rajouter des lignes !
- Soit déclarer un tableau de 0 par 0 chaines
- Soit dimensionner le tableau au début mais modifier les lignes qu'il contient

[jacquesprogram]

OK. Merci pour toutes ces précisions. J'ignorais que la déclaration du tableau dimensionné créait des lignes vides.
Ce code fonctionne parfaitement :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
nDim est un entier = TableOccurrence(TABLE_Rubriques)
tabCorrespondance est un tableau [nDim,2] chaînes
sRub1, sRub2 est une chaîne
i est un entier = 1
POUR TOUTE LIGNE DE TABLE_Rubriques
sRub1 = TABLE_Rubriques.COL_Rubriques_du_fichier_importé
sRub2=tabCols[TABLE_Rubriques.COL_Rubriques_correspondantes_dans_la_base_de_données]
tabCorrespondance[i,1] = sRub1
tabCorrespondance[i,2] = sRub2		
i++
FIN

Merci à tous !

[Hemgé]

Bonsoir

Deux questions / suggestions au passage, mais sans plus puisque nous n'avons pas de détails et qu'il ne s'agit sans doute que de code pour étudier le problème.

1 Pourquoi passez-vous par les variables intermédiaires sRub1, sRub2 ?
Vous pourriez fusionner les lignes 6 et 8, ainsi que 7 et 9.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
nDim est un entier = TableOccurrence(TABLE_Rubriques)
tabCorrespondance est un tableau [nDim,2] chaînes
sRub1, sRub2 est une chaîne
i est un entier = 1
POUR TOUTE LIGNE DE TABLE_Rubriques
<s>sRub1 = TABLE_Rubriques.COL_Rubriques_du_fichier_importé</s>
<s>sRub2=tabCols[TABLE_Rubriques.COL_Rubriques_correspondantes_dans_la_base_de_données]</s>
tabCorrespondance[i,1] = <s>sRub1</s> TABLE_Rubriques.COL_Rubriques_du_fichier_importé
tabCorrespondance[i,2] = <s>sRub2</s> tabCols[TABLE_Rubriques.COL_Rubriques_correspondantes_dans_la_base_de_données]	
i++
FIN

2. Regardez les fonctions FichiersVers ... Table, Mémoire etc qui pourraient peut-être vous être utiles, bien que le fichier que vous importez n'est sans doute pas un fichier HyperFile.

Hemgé

[jacquesprogram]

Merci pour ces suggestions mais :

• effectivement le fichier importé n'est pas un fichier Hyperfile mais un simple fichier texte
• l'utilisation des variables, c'est tout simplement parce que je pensais que mon problème venait peut-etre d'un bug de WinDev qui avait du mal avec l'affectation directe des données dans le tableau ; j'ai un peu tout essayé pour trouver d'où ça venait. Voilà.