Juste une petite précision sur la convertion des Sujet de mails, dans la RFC 2047 il faut remplacer les _ par des espaces.

non, pas encore de mise a jour, pas trop de temps afin de realiser une mise a jour. Mais rien ne vous empeche de continuer le programme en le modifiant et le fesant avancer et de le reposter sur delphifr

ce composant [TXPManifest] se trouve avec delphi 7 et pas 6 ou anterieur

ce composant est fait pour MySql, tu peux le trouver sur MySql.com (gratuit). La BDE n'est pas necessaire, c'est d ailleurs cela l'interet de ce composant, tu as juste besoin de distribuer libmysql.dll qui est gratuit et fournit avec mysql.
Rmq : Les serveurs MySql sur internet ne sont pas utilisable car la majorité son accessible seulement en localhost.

Voila, l'erreur est corrigé, il s'agissait de la regle R1 oú j avais oublié de faire bouclier jusqu'a ce qu'il ne trouve plus de ( ), contrairement aux regles R2...R5 oú par recurrence il y a un calcul des termes de gauche et de droite (mais en supposant qu'il n'y a plus de () )


Merci pour m'avoir dit l'erreur

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 .

Désolé, voici la raison des Rounds (que je vais enlever de suite)

Il y avait des round car que dans les entreprises de peinture, et dans le secteur de l impression en général je pense, ils ne comptent pas en 0..255 mais en 0..100 pour les codes CMJN, donc j avais mis un coefficient CMYKcoef afin de faire le changement automatiquement :

     C := Round(C*CMYKcoef);
     M := Round(M*CMYKcoef);
     Y := Round(Y*CMYKcoef);
     K := Round(K*CMYKcoef);

avec CMYKcoef = 2.55;

voila pour ces fameux Round qui ne servaient ici a rien

le probleme vient apparement de la fonction :
procedure TForm1.ScannerClick(Sender: TObject);

lors de la boucle
for i:=0 to HostNomSurLan.count-1 do
   envoimsg(str,HostNomSurLan[i]);

le programme passe bien sur la premiere machine mais fait un write stream error lorsqu il ecrit sur les autres, est ce un pb du a ce que l ecriture sur le premier pc n ayant pas aboutie, la seconde et les suivantes ne veulent pas se faire?