Я решил ограничиться 1. Получаемые сообщения сохраняются в той же папке что и почтовая программа. Получение 1. 0 писем: procedure TForm. Button. 2Click(Sender: TObject); label f; varmailcicl: integer; // счётчик получаемых писемaddr: string; // папка в которой будут сохраняться получаемые письмаbegin. POP3. Host: =’mail.
POP3. Port: =1. 10; // порт по которому будет осуществляться подключение. POP3. Username: =’test+5. Логин пользователя. POP3. Password: =’1.
Изучите компонент Id. Message, чтобы знать все возможные атрибуты. Получения письма с атрибутам: procedure TForm. Button. 3Click(Sender: TObject); vari,num. Posts: Integer; begin. POP3. Host: =’mail.
POP3. Port: =1. 10; // порт по которому будет осуществляться подключение. POP3. Username: =’test+5. POP3. Password: =’1. В данном примере отправка почты будет осуществляться после авторизации сервере, письмо отправляется с майла test@5. Отправка одного письма: procedure TForm. Button. 4Click(Sender: TObject); begin. SMTP. Host: =’mail.
SMTP. Port: =2. 5; // порт по которому будет осуществляться подключение. Гдз По Тригонометрии 10 Класс. SMTP. Username: =’test+5. SMTP. Password: =’1. Для работы с сетью используются три Indy компонента Id.
POP3, Id. SMTP, Id. Message. Скачать исходные коды почтовика.