Ya he logrado mostrar solo la cantidad de correos sin leer que hay en el MailBox con el idIMAP4.
Aqui les va el codigo..
al idIMAP1 lo he renombrado a cliente, y he insertado un idMailBox y lo he renombrado a MailBox1.
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
begin cliente.Host := 'correo.ipigto.rimed.cu';
cliente.Port := 143;
cliente.Username := 'NombreDeUsuario';
cliente.Password := 'contraseña';
cliente.Connect;
cliente.StatusMailBox('INBOX', MailBox1, [mdUnseen]);
Caption := 'Usted tiene ' + IntToStr(MailBox1.UnseenMsgs) + ' mensajes nuevos en la bandeja de entrada';
end;
Lo que sucede es que si no llamamos la instruccion StatusMailBox con el ultimo parametro igual a
mdUnseen pues entonces la otra instruccion de abajo nos devuelve 0 en la cantidad de correos sin leer...