powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / IMAP
2 сообщений из 2, страница 1 из 1
IMAP
    #39773640
terlalex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ни где не могу найти как скачать письма с сервера без вложений.
Подключиться получилось. А как обратиться к каждому письму?

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
  IMAP := TIdIMAP4.Create(nil);
  IMAP.Host := imap_Host;
  IMAP.Username := POP_Username;
  IMAP.Password := POP_Password;
  IMAP.Port := imap_port;
  TLS := TIdSSLIOHandlerSocketOpenSSL.Create(IMAP);
  TLS.SSLOptions.Method := sslvTLSv1;
  IMAP.IOHandler := TLS;
  IMAP.UseTLS := utUseImplicitTLS;
  IMAP.Connect;


  Imap.SelectMailBox('INBOX');
  msgcnt:= Imap.MailBox.TotalMsgs;

  for i := 1 to MsgCnt do
  begin
    ???????????????
  end;



Модератор: Пользуйтесь тегом (кнопкой) SRC для оформления кода, пожалуйста.
...
Рейтинг: 0 / 0
IMAP
    #39773665
Фотография X-Cite
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IdIMAP.Retrieve(i, msg);
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / IMAP
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]