Главная страница
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-1110273056
ser35
2005-03-08 12:10
2005.03.20
отображение даты


4-1107345027
vratar
2005-02-02 14:50
2005.03.20
Защита диска


1-1110345768
КаПиБаРа
2005-03-09 08:22
2005.03.20
Обработка ошибок или как работает Except


1-1109951514
Paul__
2005-03-04 18:51
2005.03.20
Сгенерировать уникальное имя для компонента в пределах приложения


9-1104227841
Xenon
2004-12-28 12:57
2005.03.20
Вопрос про свойства объектов