[JXJ]

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.