Borrar mensajes de correo leidos.

[dec]

Hola,

Creo que, si usas el componente "IdPop3", de los componentes Indy, cuentas ya con un método "Delete()", si no recuerdo mal, ya digo. Por otro lado, puedes descargar las "demos" de estos componentes, a modo de ejemplos, puesto que incluyen uno que es un cliente de correo más o menos completo, y que, otra vez si no recuerdo mal, incluye la posibilidad que mencionas.

PD. Si no contaras ya con el método "Delete()", que me parece que sí, siempre podrías ejecutar un "comando de servidor", precisamente, para borrar mensajes, que, me parece era "DEL" o "DELE" o algo así... tendrías que mirarlo en el protocolo POP3.

[jplj]

Muchas gracias: recordabas bien

En la documentación de los componentes Indy, encontramos:

TIdPOP3.Delete Method

Código Delphi [-]
function Delete( const MsgNum: Integer): Boolean;

Delete is a Boolean function that marks a message on the POP3 server for deletion using the message number specified in MsgNum. If a non-existent message number is used, an exception is raised.

Delete uses SendCmd to execute the POP DELE command that marks the indicated message number for deletion. Messages marked for deletion on the POP3 server will be physically removed when Disconnect is called. Use Reset to clear all message deletion marks anytime prior to calling Disconnect.

Delete returns True when the result for the operation, as indicated by LastCmdResult, contains the value ST_OK.