[Nerey]

Здравствуйте, программа =>

Код:

NMPOP31.Connect;
NMPOP31.GetMailMessage(1);
Edit1.Text:=NMPOP31.MailMessage.Subject;
Memo1.Lines:=NMPOP31.MailMessage.Body;
NMPOP31.Disconnect;

Admin: Используем теги!

<= работает, но когда встречается письмо с аттачем(вложением) то происходит сбой. Как игнорировать аттач в письмах и отображать в Memo1 только текст?
Спасибо...

[Nerey]

Не уже ли у меня одного такая проблема.... Поделитесь хоть соображениями на эту тему.

[k@Z@k]

для начала попробуй D7

[lmikle]

Сообщение от Nerey

Не уже ли у меня одного такая проблема.... Поделитесь хоть соображениями на эту тему.

Поставь Indy.

У TIDPOP3 есть событие OnWork. Параметр AWorkCount, если мне не изменяет памать, - кол-во считанных байт письма. По истечении нужного кол-ва байт надо просто рвать соединение (хотя это и не рекомендуется).

Еще вариант, использовать метот Top - вернуть N первых строк письма.

посмотри, может у нет мастера тоже есть что-то похожее, но я рекомендую пользоваться индей.

[Nerey]

Большое спасибо, буду разбираться на основе вышесказанного.