[bragol]

Задумка написать почтовый клиент, который не будет скачивать письма на компьютер для прочтения в целях безопасности, а лишь будет оповещать о получении нового письма с выводом информации об отправителе, с возможностью перейти на сайт, удалить и т.д. вот собственно наброски кода, перепробовал разные варианты, в чем я ошибаюсь?

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
var i,j: integer;
begin
timer1.Interval:=1000;
timer1.Enabled:=true;
 POP3.Host:='pop3.mail.ru'; 
 POP3.Port:=110;          
 POP3.Username:='ххх';
 POP3.Password:='******';  
 pop3.Connect;
 i:= pop3.CheckMessages;
 if i>j then begin
 showmessage('У вас новое сообщение!');
 end;
  j:=i;
pop3.Disconnect;

end;