Скачать: CL | DM;

Где мне найти в IdPOP3 (Indy) приартаченный к письму файл?   Найти похожие ветки 

← →
Behemoth ©   (2003-05-14 15:38) [0]

Обыскался...

---

← →
Behemoth ©   (2003-05-15 10:59) [1]

Неужто никто почту не принимал в Дельфи 7. А? Неверю...

---

← →
vadfe   (2003-05-15 17:25) [2]

for intIndex := 0 to Pred(Msgemail.MessageParts.Count) do
begin
if (Msgemail.MessageParts.Items[intIndex] is TIdAttachment) then
begin //general attachment
TIdAttachment(Msgemail.MessageParts.Items[intIndex]).SaveToFile(TIdAttachment(Msgemail.MessageParts.Items[intIndex]).FileName);
end
else
begin //body text
if Msgemail.MessageParts.Items[intIndex] is TIdText then
begin
Memo1.Lines.AddStrings(TIdText(Msgemail.MessageParts.Items[intIndex]).Body);
end;
end;
end;



А как выяснить кодировку письма и соостветственно его прочитать?
А то Subject выглядит примерно так ==koi8-r=?НЕВРАрРА

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c