Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.977 c
3-1108812877
Борис
2005-02-19 14:34
2005.03.20
Выбор СУБД для БД на 1 млн. записей


1-1109806090
ЦУКОР5
2005-03-03 02:28
2005.03.20
Обзор графиков


4-1105952636
Marser
2005-01-17 12:03
2005.03.20
Опрос COM-порта и потоки


14-1109414052
07BB:080Dh
2005-02-26 13:34
2005.03.20
Пневматический автомат Калашникова


3-1108553956
Gost
2005-02-16 14:39
2005.03.20
Как просканировать таблицу (парадокс) с последней записи?




   Наверх