TThread et waitfor - descripteur non valide

Lut,

Voila, j'ai un probleme avec un TThread. En fait, le thread en lui même fonctionne parfaitement bien. Le probleme c'est lorsque j'utilise sa méthode waitfor, je l'ai implémanté de cette façon la pour le débugage :

Code:

---

1 2 3

MonThread:= TMonThread.Create(Fileout); Thread.WaitFor;

---

Delphi me renvoit alors une exeception EThread, erreur de thread : descripteur non valide(6).

Code:

---

1 2 3

MonThread:= TMonThread.Create(Fileout); Thread.Suspend;

---

Je précise au passage que les autres méthodes suspend, resume fonctionnent (conf ci dessus).


Est ce que ça peut etre lié au constructor, voila ce que j'utilise :

Code:

---

1 2 3 4 5 6

constructor TThreadprincipal.Create(Currentpb_temp:integer; Url_temp:string; Filename_temp:string); begin inherited Create(False); FreeOnTerminate := True; end;

---

Hihi ! Je suis tombé dessus cet aprèm :)

En fait, cela vient du FreeOnTerminate... Comme tu le met a True, lorsque la procédure execute se termine, le thread est libéré (Jusque là, c'est normal). Saut que WaitFor quand le Thread devient égal à nil... Il n'apprécie guère !

Il suffit donc de ne pas mettre le FreeOnTerminate et de bien penser a libérer le thread manuellement :)

Code:

---

1 2 3 4 5 6

with TMonThread.Create(Fileout) do try WaitFor; finally Free; end;

---

Bon développement :)

:D Effectivement ça fonctionne bien.

Je suis arrivé à la meme conclusion, il y a quelques minutes en forçant le thread à s'autoterminer (ça fait très terminator :)) )

Code:

---

1 2	ExitThread(Thread.threadid);

---

Mais bon, je vais essayer d'implemanter ta méthode, avec le with, ça sera plus propre.