如何用nmsmtp发邮件?Help me!

Question

connect按钮事件:
nmsmtp1.Host:='smtp.tom.com';
nmsmtp1.UserID:='[email protected]';
nmsmtp1.Connect;send按钮事件:
nmsmtp1.PostMessage.ToAddress.Add(edit1.text);//收件人地址
nmsmtp1.PostMessage.Subject:=edit2.Text;//主题
nmsmtp1.PostMessage.FromAddress:=edit3.Text;//发件人地址
//nmsmtp1.PostMessage.Attachments.Assign(edit4.text);
nmsmtp1.PostMessage.Body.Assign(memo1.lines);//正文
nmsmtp1.SendMail;
nmsmtp1.Disconnect;
运行以上代码发不了邮件.不知道哪里出错?各位帮忙看一下.

Answer 1

显示连接成功！但发信时出现505Error:client  was  not  authenticated 这样的错误。