| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

INDY - атачменты... [D7]

кондратий ©   (2004-01-30 18:19:00) 

не могу никак добратса до атачмента...
как это сделать.. кто-то работал с idMessage

  for intIndex := 1 to inMsgCount do
     begin
        Application.ProcessMessages;
        msg.Clear;
        POP.RetrieveHeader(intIndex, msg);
        if IsWordPresent('REPLICATION', msg.Subject,[' ']) then
        begin
          ShowMessage(IntToStr(Msg.MessageParts.Count));
          for intParts := 0 to Msg.MessageParts.Count-1 do
            if (Msg.MessageParts.Items[intParts] is TIdAttachment) then
            begin
              ShowMessage(TIdAttachment(Msg.MessageParts.Items[intParts]).Filename);
            end;
        end;
     end;


---

gogi   (2004-03-04 04:54:00) [1]

Дело в том, что (насколько я понял :) аттачмент нельзя увидеть, пока не загрузишь все письмо (хотя это как-то глупо ...). Попробуй вместо RetrieveHeader вызвать Retrieve.

---

кондратий   (2004-01-30 18:27:00) [2]

Msg.MessageParts.Count всегда 0 хоть если смотрим на само письмо атач виден.

---

Наверх