Recherche:

Si tu as posé ton composant IDSMTP sur une form, tu n'as aucunement besoin de le créer dynamiquement.

Moi je te conseil

1 - de poser un composant IDSMTP sur la form
2 - de virer la creation...

Normal que cela ne fonctionne pas, vu que tu crées dynamiquement le composant IDsmtp et que tu ne lies pas les événements a ce composant .



IdSMTP1:=TIdSMTP.Create(nil);
IdSMTP1.OnWork :=...

Es tu sûr que ta piece jointe est bien mise dasn ton composant IDMessage ?

Car un mail uniquement Text tu verras meme pas la progressbar se deplacer.

De plus je crois qu'il y a un soucis avec...

Es tu sûr que AWorkMode est bien a wmWrite ?
Essais sans le if.

selon la taille du fichier que tu envoie, tu n'as pas le temps de voir la progressbar bougé, enleve ce que tu as mis sur le onworkend.