对SMTP邮件认证有经验的朋友请进来。。(100分)

我的这个程序是多人共用的一个程序，当用户在edit1,edit2分别输入邮箱密码和邮箱用户名时发送邮件，但有一个问题，就是多用户时nmsmtp控件中的host内容不能满足多用户使用时，，该怎么办？？我对这方面不熟悉，请高手指正。


在NMSMTP的OnConnect事件中添加代码：

var strUserName, strPassword: String;
begin
strUserName := EncodeString('CoolSlob');//CoolSlob是服务器的帐号　　　　　//请问这个coolslob是服务器的账号是邮箱的地址吗？？还是@前面的内容？？

strPassword := EncodeString('Password');//Password是密码
{进行认证，输入编码后的用户名、密码}
nmsmtp1.Transaction('EHLO') ;
nmsmtp1.Transaction('AUTH LOGIN');
nmsmtp1.Transaction(strUserName);
nmsmtp1.Transaction(strPassword);
StatusBar1.SimpleText := '连接成功';
end;
让用户自己设置host属性不可行的，，请高手指点