Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > This is a multi-part message in MIME format

Автор: Sirbesh 27.5.2010, 22:26

Прошу помощи. Простейшие письма получаю нормально(отправленные с этого же почтового клиента), а если к письму есть аттач, то выдаёт ошибку This is a multi-part message in MIME format помошите поправить процедуру получения письма.

Код


procedure TForm1.Button1Click(Sender: TObject);
 begin
 POP3.host:='pop.mail.ru';
 POP3.Port:=110;
 POP3.Username:=Edit1.Text;
 POP3.Password:=Edit2.Text;
 IdMessage.Clear;
 POP3.Connect;
 Memo1.Clear;
 POP3.Retrieve(1,IdMessage);
 Memo1.Lines.AddStrings(IdMessage.Body);
 Memo1.Text := KoiToWin(Memo1.Text);
 POP3.Disconnect;
end;

Автор: casinosoftguru 9.6.2010, 13:19

вот тут погляди исходнички..
http://www.example-code.com/delphi/smime.asp