WDForge.org - Forums

Re: faire défiler plusieurs tables en même temps

Sujet: Re: faire défiler plusieurs tables en même temps
par R&B sur 11/5/2004 9:42:11

Si ce n'est que je ne vois pas l'intéret de différencier 1 table de 5 colonnes de 5 tables d'une colonne, la synchronisation peut être effectuée par utilisation d'une procédure de synchronisation (à insérer dans la programmation de chaque table)

// Proc locale
Procédure TableSync(pcNomTable)
// récupère le n° de la table courante pour ne pas la traiter
iTab est un entier = val(Droite(pcNomTable,1))
// en récupère la position
iPos est un entier = tableselect(pcNomTable)
// pas de ligne sélectionnée : pas de synchro
si iPos=-1 alors retour
i est un entier
POUR i=1 A 5
   SI i<>iTab alors
      TableSelectPlus("Table"+i,iPos)
      TableAffiche("Table"+i,TaCourantBandeau)
   Fin
Fin

A chaque modification de la position d'une table, il faudra utiliser le code suivant (si dans code de la table) :

TableSync(moimême..nom)