请教各个高手DELPHI5中关于NMSMTP的密码验证写法(100分)

DELPHI中NMPOP的属性里到是有PASSWORD的选项而NMSMTP里没有，我也是DELPHI初学者，想
写一个邮件发送程序，但是就是不知道怎么写样NMSMTP的密码验证，请大侠多多指教，我的
邮箱是：LiDanSon@21cn.com

procedure Tform1.SendAlarmEmail;
begin
if SMTPAuthority then //SMTPAuthority 是 表示这个SMTP服务器是否需要认证的boolean
SMTP.AuthenticationType := atLogin
else SMTP.AuthenticationType := atNone;
SMTP.UserID := myzerg@263.net;//帐户
SMTP.Password := **********;//密码
{General setup}
SMTP.Host := SMTP.263.net;
SMTP.Port := 25;
try
SMTP.Connect;
except
Showmessage('连接SMTP服务器失败!');
Exit;
end;
try
with IdMsgSend do
begin
body.Clear;
Body.Add('hello world');//内容
From.Text := 'myzerg@263.net';
Recipients.EMailAddresses :='zyx_chz@263.net'//收件人
Subject:='老友,哈喽'//主题
end;
SMTP.Send(IdMsgSend);
finally
SMTP.Disconnect;
end;
end;

delphi5自带的FastNet中的NMSMTP控件不支持SMTP身份验证。而且由于没带源代码，所以没
办法解决你的问题。

推荐下载Indy(dephi6中带有它).
http://www.hktk.com:8080/cgi-bin/dl.pl?url=ftp://ftp.cq.hktk.com/soft/soft_con_internet/INDY8_00_23.EXE

之后使用 TIdMessage， TIdSMTP两个控件来替代TNMSMTP，程序写法楼上的仁兄已给出，照抄即可。