nmpop31.GetMailMessage() 求教(10分)

在能连上邮件服务器上再执行下面的语句出错：
nmpop31.GetMailMessage(strtoint(edit5.Text));
edit6.Text:=nmpop31.MailMessage.From ;
edit7.Text:=nmpop31.MailMessage.Subject ;
edit9.Text:=nmpop31.MailMessage.MessageId ;
memo2.Lines.Assign(nmpop31.MailMessage.Head );
memo1.Lines.Assign(nmpop31.MailMessage.Body );
// memo1.Text :=nmpop31.MailMessage.Body.Text ;
if nmpop31.MailMessage.Attachments.Text <> '' then
showmessage('附件数：' + #10#13 + nmpop31.MailMessage.Attachments.Text );
end;