Тема: POP3 Mail Check
Показать сообщение отдельно
  #10  
Старый 08.04.2008, 14:26
ApxaHGe1 ApxaHGe1 вне форума
Активный
 
Регистрация: 08.04.2008
Адрес: Нижний новгород
Сообщения: 311
Репутация: 38
По умолчанию

Я делал такую же программу чо бы знать о новых пислмах не запуская посторонних программ, мое мыло от хоста, и нету вб интрефейса, программа дейстительо нужная!
Вот токо добавь в нее что б было видно кол-во новых писем, эт просто:
Код:
...
var
NumMsgs, n : integer;
begin
.....
idpop31.Connect;
NumMsgs:=idpop31.CheckMessages;
Memo1.Lines.Text.Add ('У вас '+NumMsgs+' не прочитанных сообщени(я, й');
end;
....
Ответить с цитированием