DES THREADS EN 1 CLIN D'OEIL !

Commentaire de Bacterius le 23/02/2009 04:11:06

Woah la mise en page de la description a bien été massacrée.
Codé sous Delphi 6 Personal Edition.

Cordialement, Bacterius !

Commentaire de blueperfect le 23/02/2009 15:44:30

L'étape suivante est la TTaskCollection, qui sera alors plus performante qu'une batterie TTimer !

Commentaire de Bacterius le 24/02/2009 12:11:55

Merci beaucoup Exar, oui j'ai réellement 15 ans (enfin 15 et demi maintenant) ^^ Mais franchement j'adore la programmation, et quand on aime :)

@Blueperfect : euh oui encore un message mystérieux, peux-tu expliquer ton idée ? La TTaskCollection ? Une batterie de timers ?

@Cantador : Huhh les composants Jedi touchent à a peu près tout ce qu'on peut trouver dans un ordinateur, de toute façon je n'ai jamais pu installer leurs composants (me manque l'update 2 pour Delphi 6 qui requiert une inscription que je n'arrive pas à effectuer ...), donc ça a fait baisser mon estime à leur égard :/ Pour moi un pack interessant est d'abord un pack que l'on peut installer en deux clics, pas un batch qui nous demande stupidement l'update 2 ... qui n'est sûrement pas vraiment nécessaire.
Et puis autant le refaire même si il existe dans la palette JV Threading, c'est ça qui me fera la main je pense (plutôt que de passer mon temps utile à chercher ce qui n'a pas été fait).

Sinon je pensais à inclure l'évènement OnTerminate, quand le thread se termine, j'ai vu que le thread avait déjà un gestionnaire tout chaud tout frais pour nous, mais je n'arrive pas à le faire fonctionner. Je l'assigne bien, mais il n'est jamais exécuté.
Et je ne peux pas en faire un moi-même puisque je ne sais pas quand un thread se termine.

Cordialement, Bacterius !

PS : Désolé si je ne réponds pas très vite aux messages, j'ai un problème d'internet assez grave (c'est plus moi qui décide quand ça se connecte ou déconnecte maintenant ...), donc voilà.

Commentaire de Bacterius le 24/02/2009 17:20:55

Ca fait 10.000 euros. On peut avoir un bon PC avec ça :)
Mais je doute que 1 million de membres veuillent faire la démarche pour m'offrir 1 centime chacun ^^
Et Cantador, tu as testé mon composant à présent. Qu'en penses-tu ?

Cordialement, Bacterius !

Commentaire de Bacterius le 24/02/2009 22:03:07

"les types de thread" je ne comprends pas : tous les threads sont des threads ? ou existe-t-il des threads descendants spécialisés ? Ou parles-tu des priorités ?
Pour l'exemple il est vrai que j'aurai pu trouver mieux :/
Je vais y réfléchir tout en réflechissant pourquoi mon composant en test ne veut pas recevoir mon message windows personnalisé ...

Cordialement, Bacterius !

PS : pour les 1 centime par membre : on va vite être décus, il y a environ 100.000 membres "actifs", le reste sont des comptes automatiques ou des gens qui ont posé 1 question il y a 5 ans ...

Commentaire de exar le 24/02/2009 23:31:17

Bacterius: et à propos d'âge, le tien n'est pas correct sur ton profil !  TU n'as pas 108 ans !  Si tu viens d'une galaxie située à 123.698.227 années-lumière, tu dois au moins avoir 123.698.227 ans !

Commentaire de Nicolas___ le 25/02/2009 03:42:11

@ exar : http://fr.wikipedia.org/wiki/Vitesse_supraluminique
la vitesse de la lumière n'est peut être pas un problème ...

@bacterius :
Salut , c'est vrai que c'est assez sympa ce petit code... ça me fait penser à quelques astuces que j'utilise ;)
c'est sur que pour ton age , c'est prometteur , même tes explications sont claires et "sympa" à lire.
il y a du boulot et ça se ressent...

une petite note pour l'égo (ça fait pas de mal ;) ) : 9/10  

Commentaire de cantador le 25/02/2009 11:30:01 administrateur CS

Si tu viens d'une galaxie située à 123.698.227 années-lumière, tu dois au moins avoir 123.698.227 ans !

hé non raté, car j'ai pris un raccourci par les trous noirs pour ressortir par celui énorme de la voie lactée !
Et en fait je me déplace en temps réel sans énergie baignant dans un fluide comme la pensée..

Et me voilà frais comme un gardon juste pour mettre un 10/10 à Bactérius qui le mérite bien.

cantador

Commentaire de exar le 25/02/2009 11:39:30

CANTADOR: c'est sans doute à cause du fluide... ;o)

Commentaire de Bacterius le 25/02/2009 12:06:51

Salut,
merci à tous :)
Je viens de finir un 2eme exemple pour les threads (il suffit de modifier une constante et oh ! magie : plusieurs threads apparaissent sans effort.
Dès que j'ai internet sur mon PC je vous le met.
Indice : c'est une animation ...

Cordialement, Bacterius !

PS : dès que j'aurai quelques composants sympas comme ça, je les mettrai tous sur 1 onglet et j'en ferai un pack.

Commentaire de Bacterius le 26/02/2009 15:23:16

Interessant les Fibers ... mais Delphi ne documente pas les TFibers (je ne sais même pas si la classe existe dans D6).

Remarque : je prends du retard dans la mise en ligne du 2eme exemple, car j'ai l'impression que Delphi fait certaines choses en background dans notre application quand on la teste dans l'IDE, ce qui cause des violations d'accès à la fermeture (j'en ai de temps en temps dans l'IDE, jamais en dehors !).

Cordialement, Bacterius !

Commentaire de Bacterius le 26/02/2009 17:04:20

J'avoue, j'ai cherché dans google je ne trouve que des offres de fibres optiques ...
J'ai quand même réussi à dégotter ce site :
http://conferences.codegear.com/article/32225

Il y a un petit article sur les fibers :

Fibers
Fibers are relatively new to Win32 operating systems and are only available on WinNT and above. They are sometimes referred as "lightweight threads" or "user-mode threads". Unlike threads, fibers must be scheduled by the application manually and are not visible by the kernel. Typically, fibers are used for porting from other operating systems where applications contained their own threading systems and did not want to rely on priority based scheduling.

Threads are capable of creating a collection of fibers. Since a fiber is not given a time-slice by the kernel, a fiber runs in the context of a thread.

A fiber, then, is an execution path in a thread. It has stack space, certain registers and whatever data is passed to the fiber upon creation.

At the time of this writing, there is no Delphi class that wraps the fiber APIs. Listed below are the fiber APIs. All functions except GetFiberData() are found in Windows.pas.

function CreateFiber(dwStackSize: DWORD; lpStartAddress: TFNFiberStartRoutine;
                     lpParameter: Pointer): BOOL; stdcall;
function DeleteFiber(lpFiber: Pointer): BOOL; stdcall;
function ConvertThreadToFiber(lpParameter: Pointer): BOOL; stdcall;
function SwitchToFiber(lpFiber: Pointer): BOOL; stdcall;
function GetFiberData : Pointer; stdcall;

Hmm ça fait 5 routines ça, alors que pour les threads il y en a sûrement plus.
Je sais pas pour vous mais j'ai toujours trouvé les déclarations des paramètres d'API très jolies à la lecture (lparam, dwflags, etc ...).

Cordialement, Bacterius !

Commentaire de Bacterius le 26/02/2009 18:15:45

Mais un BOOL peut représenter un pointeur s'il s'agit d'un LongBool (2 mots en mémoire, 32 bits), mais sous forme d'adresse (convertir avec Ptr() ensuite) non ?

Cordialement, Bacterius !

Commentaire de Nicolas___ le 26/02/2009 19:26:57

j'espère ne pas mettre de connerie mais sur msdn

Fibers : http://msdn.microsoft.com/en-us/library/ms682661(VS.85).aspx

Using Fibers : http://msdn.microsoft.com/en-us/library/ms686919(VS.85).aspx

Commentaire de Nicolas___ le 26/02/2009 19:54:49

je ne sais pas si les sources d'indy 10 sont en clairs ('.pas' et non '.dcu') ou pas , mais il me semble qu'il utilise les Fibers, c'est d'ailleurs un des grands avantages (meilleure performance)...
Maintenant pour s'y retrouver la-dedans ... adieu le lightweight et bonjour l'indigestion !  

Commentaire de blueperfect le 01/03/2009 22:58:35

En, fait tu découvres l'art du multitâche...

Commentaire de blueperfect le 02/03/2009 11:12:55

En ce qui concerne la TTaskCollection, que j'évoquais dans les commentaires du début, il s'agit d'une gestion avancées de "travaux" du type Fiber...mais qui ce base sur un TTimer, où sur une gestion propre dans le Execute du Thread...

DH

PS : Il est dommage de ne pouvoir joindre de copie d'écran à nos commentaires, Monsieur le WebMaster...

DH

Commentaire de Bacterius le 03/03/2009 19:03:00

"avec un TTimer"
Donc toi tu mettrais un TTimer dans le composant ... mais là aussi tu perds tout l'intêret du TThread. Je vais te raconter une histoire :

Un gars est en train d'essayer de verrouiller un coffre-fort.
Un gars arrive : "pourquoi tu verrouilles le coffre-fort ? Je vais te montrer comment faire."
Le même gars enleve le verrou de ce coffre-fort, le met dans un autre coffre-fort et ferme ce dernier à clé.

Et voilà, en fin de compte c'est plus dur d'aller chercher le contenu du premier coffre fort et c'est stupide.

Les TTimer sont des pompes à CPU, alors associé à un thread ...

"* Si tu fais "dormir" ton thread, quel intérête de ne pas utiliser un TTimer ?"

C'est vrai, je te le concède, j'aurai pu utiliser une fonction de "pause non bloquante", le site en propose deux ou trois.

"* Le Application.ProcessMessages ne veut strictement rien dire, vu que le thread s'éxécute dans un autre contexte que celui de l'application..."

J'ai trouvé ça dans le tutorial de GrandVizir. Je suppose que GrandVizir a une bonne explication à la présence de cette ligne dans son tutorial, donc voilà.

Cordialement, Bacterius !

PS : je ne voudrais pas déclencher de conflit, mais puisque tu as tellement de bonnes idées pourquoi ne pas les proposer sur le site ? A chaque source sur laquelle tu passes, tu glisses un message type "carte de visite", si tu vois ce que je veux dire.

Commentaire de Bacterius le 03/03/2009 19:37:37

"Je ne peux publier un composant sans les autres..."

Ben publies-le avec les autres ...

GrandVizir est un membre du site, tu trouveras vite ses tutoriaux sur delphifr.com (il en a fait la majorité).

Cordialement, Bacterius !

Commentaire de cirec le 14/03/2009 11:03:25 administrateur CS

non pas de BPL ici
un BPL n'est pas différent d'un Exe ou d'une Dll  c'est du code compilé et donc par ce fait interdit !!!

Commentaire de Bacterius le 14/03/2009 16:59:51

Si tu veux publier quelque chose tu publies tout ... ici c'est un site de partage.

Cordialement, Bacterius !

Commentaire de Bacterius le 14/03/2009 17:07:51

Ben tu attends qu'ils soient fonctionnels ... y'a pas le feu ...

Cordialement, Bacterius !