Discussion :

[Bleys]

Re Re Bonsoir à tous,

Après j'arrête c'est promis ... (enfin pour ce soir au moins ) ... mais bon normal que je me pose des questions, c'est la première fois que je fais du multi-thread sous windows en Delphi ...

Je me suis pausé une question :
lorsque l'on appel la méthode Suspend d'une classe dérivé de TThread depuis le thread principal ... le thread visé est-il suspendu immédiatement ? ... Donc en gros s'il est dans une section critique et qu'il est suspendu on risque d'avoir un problème ?

Donc si ce que je dis est vrai ... le mieux est certainement de créer une méthode internet à notre classe qui déterminera s'il peut se suspendre ou non ... Non ?


Merci de votre réponse

[Paul TOTH]

Re Re Bonsoir à tous,

Après j'arrête c'est promis ... (enfin pour ce soir au moins ) ... mais bon normal que je me pose des questions, c'est la première fois que je fais du multi-thread sous windows en Delphi ...

Je me suis pausé une question :
lorsque l'on appel la méthode Suspend d'une classe dérivé de TThread depuis le thread principal ... le thread visé est-il suspendu immédiatement ? ... Donc en gros s'il est dans une section critique et qu'il est suspendu on risque d'avoir un problème ?

Donc si ce que je dis est vrai ... le mieux est certainement de créer une méthode internet à notre classe qui déterminera s'il peut se suspendre ou non ... Non ?


Merci de votre réponse

S'il utilise une section critique, il vaut mieux acquérir cette section avant de le suspendre

[Bleys]

C'est vrai, c'est une autre façon de faire, certainement plus propre ...



Merci de ta réponse

[Bleys]

Je me permet de relancer le sujet en modifiant quelque peu ce que j'ai dit :

Supposons que je veux que l'utilisateur ne puisse suspendre le thread qu'une fois sa boucle en cours d'exécution est terminée comment faire ?

J'ai évidemment pensé à utiliser une variable interne à mon thread du style arretDemande et d'implémenter mon Execute comme ça :

Code :

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

1
2
3
4
5
6
7
8
9
 
while not(Terminated) do
begin
   while not(arretDemande) do
   begin
      // mon traitement
   end;
// Point numéro 1
end;

Je me dis alors qu'il suffit de surcharger la méthode Suspend de mon thread pour que son rôle se limite à modifier la valeur de arrêt demandé. Si je ne fais pas appel à inherited dans le corps de cette méthode mon thread ne devrait pas se suspendre vrai ? Ca donnerait donc quelque chose comme ça :

Code :

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

1
2
3
4
5
 
procedure TMonThread.Suspend;
begin
     arretDemande := true;
end;

Cela étant dit je voudrais tout de même que mon thread se suspende réellement (inutile qu'il tourne pour rien). D'où mon commentaire où j'ai écrit Point numéro 1 : je pense ici ajouter l'appel à la méthode Suspend.

Et c'est là que j'ai un problème. Si je fais ça comme ça, il va appeler ma méthode surcharger => il ne devrait pas se suspendre tout seul ...

Comment résoudre se problème pour qu'il se suspende réellement ?



Par avance merci

[Rayek]

Interrompt l'exécution du thread.

Classe
TThread

Syntaxe


[Delphi] public procedure Suspend();


Description
Appelez Suspend pour interrompre temporairement l'exécution du thread. Pour reprendre l'exécution après un appel à Suspend, appelez Resume. Il est possible d'imbriquer les appels de la méthode Suspend ; Resume doit alors être appelée le même nombre de fois que Suspend avant que l'exécution du thread reprenne.

[Bleys]

J'ai bien lu et relu l'aide de Delphi ... Seulement ça ne répond pas à ma question, ou alors je ne l'interprète pas comme il faut ...