Bonjour tout le monde,
voilà j'ai une application permettant d'envoyer un fichier à plusieurs
postes connectés en réseaux. j'ai une table contenant les différents
postes et dans cette table j'ai une colonne affichant une jauge de
progression de l'émission pour le poste concerné.
Voilà, vu que les envois doivent se faire de manière simultanée, je
souhaite mettre un thread appelant une procédure affichant la progression.
C'est à dire que l'envoi du fichier au poste N+1 est lancé tout de suite
après l'envoi au poste N.
Si vous avez des conseils merci de me répondre
A bientôt
Nico.

Merci à tous por vos réponse,
Mais voilà ce que j'essaie :

POUR i = 1 A TableOccurrence(TBL_PLAT)
TableSelectPlus(TBL_PLAT,i)
ThreadExécute("Thread"+i,threadUtiliseHyperFile,"EnvoiFichier")
AjoutInfo("Thread"+i+" "+TBL_PLAT.B_ENVOI)
FIN

Cette solution a pour conséquence de générer l'erreur suivante: Lors de
l'éxécution du second Thread, il me dit que la procédure EnvoiFichier est
déjà utilisée, ce qui est logique.
Alors j'ai tenté d'utiliser une sémaphore mais je vous avoue que je ne
suis pas très à l'aise avec l'utilisation de ces commandes. Alors ça n'a
pas fonctionné non plus. Il me disait, au passage sur l'instruction
SemaphoreFin("SEMA"), qu'il ne pouvait fermer une sémaphore qui n'avait
pas été ouverte, or j'avais bien mis l'instruction SemaphoreDebut("SEMA")
avant la zone de code protégé.
Voilà là je suis en train de voir avec une procédure dynamique ce qui va
me permette de supprimer l'utilisation des sémaphores mais qui va s'avérer
délicat car la procédure dynamique va devoir appeler 2 autres procédures
du projets.
Donc voilà, si vous pensez que l'utilisation des sémaphores est
préférable, aidez-moi s'il vous plait.

Merci.
Nico...

Merci Dany mais j'avais déjà placé ThreadMode(ThreadSectionCritique) dans
l'initailisation de ma fenêtre et ça ne change rien.
En tout cas il y a du changement, j'ai laissé tombé la procédure dynamique
et je me suis remis sur les sémaphores et ça commence a bien tourné, voici
un bout de mon code :

SémaphoreDétruit("S1")
SémaphoreCrée("S1")
POUR i = 1 A TableOccurrence(TBL_PLAT)
TableSelectPlus(TBL_PLAT,i)
SI TBL_PLAT.B_MAJ_AUTO = 2 ET TBL_PLAT.B_PROG = 2 ALORS

ThreadExécute("Thread"+i,threadUtiliseHyperFile,"EnvoiFichier",i)
ThreadAttendSignal()
gNbEnvoi++
FIN
FIN

voilà la variable que j'incémente me permet de savoir le nombre de fichier
que j'envoie, elle me sert aussi lors de l'arrêt des envois.
Par contre je ne suis pas sûr que ce code me permet d'envoyer mon fichier
sur tous les postes du réseau en même temps. Je crains que l'envoie au
poste 2 se fait uniquement après réception du fichier par le poste 1.
Qu'en pense-tu?
En tout cas merci pour l'aide que tu m'as apportée.
Nico.

En fait, j'ai une jauge en dehors de ma fenêtre et j'utilise un champ
clone à chaque ligne de mon tableau en lui donnant l'indice de ma ligne
(JaugeL<indice>).

Quand je lance ma procédure, je vois les jauges se remplir les une après
l'autre or je voudrais qu'elle se remplissent simultanément, en "canon".
La seconde commence à se remplir avant que la première soit terminée.

Là je cale un peu mais il faut absolument que je trouve.

Voilà, qu'est ce que t'en dis.

Nico.

En fait, j'ai une jauge en dehors de ma fenêtre et j'utilise un champ
clone à chaque ligne de mon tableau en lui donnant l'indice de ma ligne
(JaugeL<indice>).

Quand je lance ma procédure, je vois les jauges se remplir les une après
l'autre or je voudrais qu'elle se remplissent simultanément, en "canon".
La seconde commence à se remplir avant que la première soit terminée.

Là je cale un peu mais il faut absolument que je trouve.

Voilà, qu'est ce que t'en dis.

Nico.