Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 11.09.2018, 20:04
Pcrepair Pcrepair вне форума
Новичок
 
Регистрация: 20.01.2015
Сообщения: 52
Версия Delphi: Pascal
Репутация: 10
По умолчанию INDY, IMAP, вложения в письмо

Добрый день. Обычно у всех вопрос как получить вложения в письмо.
но мне нужно все наоборот - не загружать вложения. не нужны.
текущий код предусматривает загрузку всего письма с последующей передачей на обработку :

Код:
          IMAP.RetrieveAllHeaders(IMAP.MailBox.MessageList);
          aMsgCnt:=IMAP.MailBox.MessageList.Count;

          if (aMsgCnt > 0) then
          begin

            for I := aMsgCnt downto 1 do
            begin
              if aRetrMail then
              begin                                 (*retrieve letter*)
                Msg.Clear;
                fStream.Clear;
                IMAP.Retrieve(I,Msg);

                Msg.SaveToStream(fStream);
                fStream.Position:=0;
                Lst2.LoadFromStream(fStream);
                Lst1.Add('<rowmail>');         (*ROW mail text*)
                Lst1.Add(Lst2.Text);
                Lst1.Add('</rowmail>'+sLineBreak);
              end;
            end;

            aList.Assign(Lst1);
          end;

Вопрос : нет ли возмжно что то настроить в Msg(TIdMessage) что бы вложения не грузились с сервера
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:54.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter