delphi imap gmail obtener mails no leidos, mas recientes, por fecha
 

delphi imap obtener mails no leidos, mas recientes, por fecha

tengo el siguiente codigo para conectarme a gmail
pero no logro obtener los mails no leidos.
los mas recientes.

solo obtengo la cantidad total de mensajes.
'¿saben como se puede hacer?

¿se puede obtener los mails, por fechas desde una fecha incial a una final y bajarlos?

Código Delphi [-]

procedure TForm1.BtnConectarClick(Sender: TObject);
var
 CantidadTotalMails : integer;
 CantMailsRecientes : Integer;
 CantMailsNoVistos : Integer;
begin

      IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Method := sslvSSLv3;
      IdIMAP41.IOHandler := IdSSLIOHandlerSocketOpenSSL1;
      IdIMAP41.Host := edtServer.Text;
      IdIMAP41.Port := 993;
      IdIMAP41.UseTLS := utUseImplicitTLS;
      IdIMAP41.Username := edtUser.Text;
      IdIMAP41.Password := edtPassword.Text;
      IdIMAP41.Connect;
      try
        if IdIMAP41.SelectMailBox('INBOX') then
          CantidadTotalMails   := IdIMAP41.MailBox.TotalMsgs;
            CantMailsRecientes := IdIMAP41.MailBox.RecentMsgs;
                      CantMailsNoVistos := IdIMAP41.MailBox.UnseenMsgs;
      finally
        IdIMAP41.Disconnect;
      end;

      Memo1.Lines.Add(IntToStr(CantidadTotalMails));
      Memo1.Lines.Add(IntToStr(CantMailsRecientes));
      Memo1.Lines.Add(IntToStr(CantMailsNoVistos));



end;

gracias.

Respuesta
 

Has tratado de buscar en la documentación de Indy porque de seguí hay encontrarás la respuesta,yo eh creado un proyecto parecido pero uso pop para recolectar