![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Где мне найти в IdPOP3 (Indy) приартаченный к письму файл? [D7]
Behemoth © (2003-05-14 15:38:00)Обыскался...
vadfe (2003-05-15 17:25:00) [1]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=?НЕВРАрРА
Behemoth (2003-05-15 10:59:00) [2]Неужто никто почту не принимал в Дельфи 7. А? Неверю...