Problemes avec des tables

**oyarson** · 12/06/2012, 14h50

Bjr à tous j'ai deux soucis qui me dérange pour le moment :
1- J'ai une table qui lorsque je valide les informations des champs ajoute une nouvelle ligne vide, il me faut fermer l'application et la relancer pour voir le nouvelle enregistrement dans la table.
Voici le code du bouton:

Code :

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

1
2
3
4
5
6
7
8
9
10
 
TableSupprimeTout(TABLE_Article)
HLitPremier(Article,Ref)
TANTQUE H.Trouve ET PAS H.EnDehors
	TableAjoute(TABLE_Article)
	HLitSuivant(Article,Ref)
FIN
EcranVersFichier()
HAjoute(Article) 
RAZ(Vrai)

2- J'aimerai savoir si c'est possible d'avoir les informations de la colonne d'une table sur une autre colonne d'une autre table...
Exemple :

Code :

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

table1.colonne1=table2.colonne2.

Merci de votre aide...

**frenchsting** · 12/06/2012, 16h20

1- Regarde du coté de tableaffiche

2- Ta syntaxe est bonne mais il faut te positionner au bon endroit et que les conditions soient réunies :
Exemple 1 : au moins 5 lignes existent dans table 1 et au moins 3 lignes existent dans table 2 :

Code :

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

1
2
3
4
5
6
Position1, Position2 sont des entiers
Position1 = 5
Position2 = 3
tableselect(table1, Position1)
tableselect(table2, Position2)
table1.colonne1=table2.colonne2

Si tu veux "simplement" ajouter une ligne dans la table 2 (colonne 1 : rien et colonne 2 la valeur table1.colonne1) :

Code :

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

1
2
3
4
Position1 est un entier
Position1 = 5
tableselect(table1, Position1)
tableajoute(table2, tab + table1.colonne1)

**SevenSoftware** · 12/06/2012, 16h56

Bonjour,

Dans le TableAjoute, vous n'indiquez pas le contenu de la ligne.
(article.ref+TAB+Article...
Utilisez de pref TableAjouteLigne

Bon dev

Patrick

**frenchsting** · 13/06/2012, 11h54

Envoyé par SevenSoftware

Bonjour,

Dans le TableAjoute, vous n'indiquez pas le contenu de la ligne.
(article.ref+TAB+Article...
Utilisez de pref TableAjouteLigne

Bon dev

Patrick

Mon code fonctionne. La syntaxe est un peu limite je l'avoue. J'aurais du écrire :

Code :

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

1
2
3
tableajoute(table2, "" + tab + table1.colonne1)
ou 
tableajouteligne(table2, "",table1.colonne1)

Je suis habitué au tableajoute. D'ailleurs, c'est un petit reproche que je fais à pcsoft : avoir des fonctions avec des noms/syntaxes légérement différent(e)s pour un résultat identique.

Bonne remarque tout de même.