Bonjour,

J'essaie de developper un envoi de mail.

Pour cela je n'arrive pas à ajouter les adresses de destination a la propriété ToAdress qui est un TStringList.

J'ai essaye en faisant  NOMTSTRINGLIST.Add(mail) ou encore NOMTSTRINGLIST.text := mail mais rien ne fonctionne. Pourtant si j'affiche NOMTSTRINGLIST[0] cela fonctionne.

Si je passe en mode debugage, a un moment, j'ai le maessage suivant :
La variable 'NOMTSTRINGLIST' est inaccesible ici du fait de l'optimisation.

Pouvez vous m'aider
Merci

Salut,

et Mail est de quel Type ?

Comme sont nom l'indique la StringList n'accèpte que les String ( Chaines de caractères)

@+
Cirec

Hello,

As tu pensé a créer ton tstringlist avant de l'utiliser :
NOMTSTRINGLIST := TStringList.Create;

   Try
   //ton traitement ici
   Finally
   FreeAndNil(NOMTSTRINGLIST);
   end;

Bonne prog,
JMP77.

N'oubliez pas de cliquer sur réponse acceptée.

Mail est de type string.

Et le tstringlist a bien été créé. donc je ne sais vraiment pas pourquoi