indy. POP. Recuperar BODY
Para recuperar la cabecera de un correo uso lo siguiente que funciona perfectamente :
POP.RetrieveHeader(intIndex, IdMessage1); itm := ListView1.Items.Add; itm.Caption := IdMessage1.Subject; itm.SubItems.Add(IdMessage1.From.Text); itm.SubItems.Add(DateToStr(IdMessage1.Date)); itm.SubItems.Add(IntToStr(POP.RetrieveMsgSize(intIndex))); Lo que deseo es recuperar los primeros caracteres del cuerpo del mensaje (BODY) sin que me marque el correo como leido (STATUS de la cabecera a R). Por lo visto con el RetrieveHeader no puedo leer el body, y utilizando POP.Retrieve para leer el body no me sirve porque automaticamente me lo pone como correo leido. Existe alguna forma ? La idea que llevo es hacer un notificador de correo tipo google, que te avisa cuando te llega un correo nuevo, indicándote quien te lo envia, fecha, asunto y un trozo del mensaje. Gracias. |
Al final solucione el problema abriendome un socket y pasándole ordenes TELNET.
|
La franja horaria es GMT +2. Ahora son las 21:27:17. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi