Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.20;
Скачать: CL | DM;

Вниз

Непрочитанные сообщения   Найти похожие ветки 

 
bulkas   (2005-01-12 00:58) [0]

Принимаю почту используя TIdPOP3.
Количество сообщений узнать могу IdPOP31.CheckMessages.
Но никак не получается определить количество непрочитанных сообщений.
Пытался использовать TIdMessageFlagsSet где впринципе есть значение mfSeen, указывающее прочитано сообщение или нет.
Но почему-то получается, что у меня все сообщения прочитаны.

Как быть?
Заранее спасибо.


 
aus   (2005-01-12 03:53) [1]

А разве POP3 допускает такой запрос-ответ (о прочитанных или непрочитанных сообщениях). Скорее всего нет. Т.е. методами TIdPOP3 вряд ли получится проверить.
Или я что-то не понял...


 
bulkas   (2005-01-12 04:00) [2]

а IMAP позволяет?


 
aus   (2005-01-12 04:10) [3]

Насчет позволяет - не знаю, но сервер-то какой протокол поддерживает? Или ему все равно?


 
bulkas   (2005-01-12 17:06) [4]

IMAP поддерживает, но все равно не получается считать флаги сообщений.


 
bulkas   (2005-01-12 18:05) [5]

Ладно, может есть у кго-нибудь ссылка на хелп для Indy?
Был бы вдвойне благодарен!


 
bulkas   (2005-01-12 21:58) [6]

Спасибо за помощь. в кавычках.
Для тех кому это понадобится вот рабочий пример:

procedure TForm1.Button2Click(Sender: TObject);
var
 f,MessCount, NoReadMessCount:Integer;
begin
 if IdIMAP41.Connected then IdIMAP41.Disconnect;
 IdIMAP41.Connect(10000);
 if IdIMAP41.Connected then
 begin
   IdIMAP41.SelectMailBox("INBOX");
   IdIMAP41.RetrieveAllEnvelopes(IdIMAP41.MailBox.MessageList);
   MessCount:=IdIMAP41.MailBox.MessageList.Count;
   NoReadMessCount:=0;
   for f:=1 to MessCount do if not IdIMAP41.CheckMsgSeen(f) then inc(NoReadMessCount);
 end;
 ShowMessage(IntToStr(NoReadMessCount));
end;


 
Eraser ©   (2005-01-12 22:16) [7]

bulkas
обыщи сайт http://www.indyproject.org/


 
Sicilla ©   (2005-01-14 05:39) [8]

Извини, bulkas, но у тебя есть пример как можно просмотреть количество писем на сервере почтовом? Очень надо, плиз.



Страницы: 1 вся ветка

Текущий архив: 2005.03.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.027 c
1-1110143396
LogOnn
2005-03-07 00:09
2005.03.20
Delay();


14-1109916632
Vlad Oshin
2005-03-04 09:10
2005.03.20
А не кажется ли Вам, что Достоевский шатает капитализм?


4-1108021054
__max__
2005-02-10 10:37
2005.03.20
Проблемы с OpenFileMapping - Не удается найти указанный файл


6-1105901644
Eraser
2005-01-16 21:54
2005.03.20
Multicast и всё, что с ним связано.


1-1109855002
Aleksandr.
2005-03-03 16:03
2005.03.20
А-а! Почему TDecompressionStream распаковывает не то?!