THREAD SIMPLE

cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 18 mars 2002 à 21:16
cs_Gerard Messages postés 121 Date d'inscription jeudi 10 janvier 2002 Statut Membre Dernière intervention 7 août 2018 - 10 avril 2009 à 19:54
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/11803-thread-simple

cs_Gerard Messages postés 121 Date d'inscription jeudi 10 janvier 2002 Statut Membre Dernière intervention 7 août 2018
10 avril 2009 à 19:54
J'ai utilisé et cela marche tout seul.
C'est excellent quand on utilise Indy, car ainsi on garde la main, même en cas de non réponse du serveur et on peut interrompre le processus.
cs_gamez Messages postés 34 Date d'inscription samedi 14 juin 2003 Statut Membre Dernière intervention 27 janvier 2007
6 juin 2004 à 22:40
jai trouvé lexplication, mais maintenant jai un autre truc qui me tracasse

jai supprimé ta procedure tboucle.affiche
et ds la procedure tboucle.execute au lieu de faire le synchronize(affiche) je mets le code qui etait dans la procedure affiche a cet endroit
en faisant ca, ca marche sans probleme.
ds ce cas à quoi sert donc le synchronize et le tboucle.affiche??

merci
cs_gamez Messages postés 34 Date d'inscription samedi 14 juin 2003 Statut Membre Dernière intervention 27 janvier 2007
6 juin 2004 à 16:46
jai une autre question

jai repris ce zip tel quel, jai ajouté un composant indy (TidTCPClient) je suis allé dans la procedure Tboucle.execute et là... le idtcpclient1 nest pas reconnu jai un message qui me dit quil nest pas déclaré pourtant il est bien reconnu qd je le mets au debut du prog.

qqun a une explication?

merci
cs_gamez Messages postés 34 Date d'inscription samedi 14 juin 2003 Statut Membre Dernière intervention 27 janvier 2007
3 juin 2004 à 23:11
merci pour ta reponse
mais qd tu dis que la procedure est appelée automatiquement, coment on parametre son "declencheur"?
(je sais jai du mal mais bon..)
Bombela Messages postés 225 Date d'inscription mardi 4 mars 2003 Statut Membre Dernière intervention 30 juillet 2008
3 juin 2004 à 12:26
gamez, c'est simple, la procédure Execute est ovveride, ce qui veut dire quelle complète une procédure existante. Et dans le cas d'un objet Thread Delphi, cette procédure est appelée automatiquement.

@+
cs_gamez Messages postés 34 Date d'inscription samedi 14 juin 2003 Statut Membre Dernière intervention 27 janvier 2007
3 juin 2004 à 00:10
salut
jy connais rien en thread et jai visualisé ta source, je ne comprends pas comment tu lances le compteur.
à aucun moment tu n'appelles ta procedure tboucle.execute.
l'action qui correspond au clic du bouton appelle tboucle.create et pas tcboucle.execute pourtant ca marche..
peux tu mexpliquer please?

merci
korpica Messages postés 10 Date d'inscription mercredi 28 mai 2003 Statut Membre Dernière intervention 8 août 2008
30 mars 2004 à 18:37
tien, encore un sinchornize
Bombela Messages postés 225 Date d'inscription mardi 4 mars 2003 Statut Membre Dernière intervention 30 juillet 2008
18 mars 2003 à 22:06
"//ca je c pas a koi ca sert, mais ca sert
FreeOnTerminate := True;"

Ca sert à dire au thread qu'il dois se liberer tout seul quand le prog se termine.

Bombela
alexanderpopov Messages postés 19 Date d'inscription jeudi 16 mai 2002 Statut Membre Dernière intervention 28 janvier 2008
9 nov. 2002 à 14:11
lors de la creation de ton thread tu le fais partir sans garder une reference de celui-ci : TBoucle.Create;

Autant créer une variable Boucle:TBoucle; (qui n'est pas mise dans la source) afin par la suite de pouvoir modifier le thread en cours d'execution, comme par exemple sa priorité : Boucle.Priority .
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 32
18 mars 2002 à 21:16
La méthode Execute est déclarée virtual;abstract si ma mémoire est bonne. Le mot clé inherited est donc ici superflu et inutile dans ce cas.