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

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

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