as-tu bien fait qqpart :
itm := TListItem.Create; ?
il le faut avant le " while not reqMessage.Eof do "
puis n'oublie pas (quand tu n'en a plus besoin) de le libérer avec
itm.free;
N'oubliez pas de cliquer sur
Réponse acceptée lorsque la réponse vous convient !

-------------------------------------------
[ Lien ] : mon site refait ! Delphi power !