发送邮件用什么控件？能不能直接填写邮箱地址、邮件标题和内容就可以调用控件方法发送出去的，在任意机子上？

[quote=引用 19 楼 ooolinux的回复:][quote=引用 18 楼 advance_coder 的回复:] 不知道你自己是否会写socket，会写的话，可以百度RFC(里面有多方面的协议标准文档，都是英文的)，再在rfc网站搜索smtp有详细介绍。祝好运。

[quote=引用 18 楼 advance_coder 的回复:] 不知道你自己是否会写socket，会写的话，可以百度RFC(里面有多方面的协议标准文档，都是英文的)，再在rfc网站搜索smtp有详细介绍。祝好运。

不知道你自己是否会写socket，会写的话，可以百度RFC(里面有多方面的协议标准文档，都是英文的)，再在rfc网站搜索smtp有详细介绍。祝好运。

qq的邮箱，要在邮箱设置里面启用smtp服务才能发送邮件，163的也是类似。另外qq邮箱的smtp端口不是默认的，要设置成qq邮箱推荐的端口。你网上搜下看看。

就是hello，握手命令，把自己的域名告诉接收者

https://blog.csdn.net/zhouky1993/article/details/60953892

[quote=引用 8 楼 ooolinux 的回复:]
[quote=引用 2 楼 老大i 的回复:]
https://blog.csdn.net/zhouky1993/article/details/60953892

[quote=引用 2 楼 老大i 的回复:]
https://blog.csdn.net/zhouky1993/article/details/60953892

procedure TForm1.btnSendMailClick(Sender: TObject);

begin

  //------------------------------------

  //设置登录信息

  //ZkyIdSMTP为控件名，

  //可自己更改为与上面的一样的名字。  

  //格式为：

  //<TIdSMIP控件名>.<属性>:=<自己的信息>  

  //------------------------------------

  ZkyIdSMTP.AuthenticationType := atLogin;//设置登录类型，一般不变动  

  ZkyIdSMTP.Host := 'mail.qq.com';   //设置SMTP地址

  ZkyIdSMTP.UserId := '1111@qq.com';   //设置登录账号

  ZkyIdSMTP.Password := '1111';      //设置登录密码

  ZkyIdSMTP.Port := 25;                   //设置端口，必须要整形型

  try

    ZkyIdSMTP.Connect;                    //连接服务器

  except                               //如果连接失败，提示并退出程序  

    ShowMessage('连接服务器失败');  

    Exit;

  end;

  ShowMessage('成功连接服务器。'+#10#13+'点击确认后准备发邮件。');  

  

  

  //------------------------------------

  //配置发送的内容，格式为：

  //<TIdMessage的控件名> . <属性>:=  

  //------------------------------------

  ZkyIdMessage.From.name := '1111@qq.com';//设置发件人姓名

  ZkyIdmessage.Recipients.EMailAddresses:='2222@qq.com';//设置收件人邮箱地址（此为单发邮件的语句，群发时需去掉）

  Zkyidmessage.Subject := '这是邮件的主题'; //设置邮件主题

  Zkyidmessage.body.text := '这是邮件的内容';//设置邮件内容  

  

  

  //------------------------------------  

  //群发邮件：

  //ZkyIdMessage.Recipients.add.Text:='<收件人邮箱>';

  //ZkyIdMessage.BCCList.Add.Address := '<抄送人邮箱>' ;

  //ZkyIdMessage.CCList.Add.Address := '<密送人邮箱>' ;

  //发送给多人的时候，多打几遍语句。

  //------------------------------------

  

  

  try  //发邮件

    ZkyIdSMTP.Send(ZkyIdMessage);

    Showmessage('邮件发送成功!');  

  except

    Showmessage('邮件发送失败!');

  end;

 

 

end;



————————————————

版权声明：本文为CSDN博主「楠珂伊梦千里月」的原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接及本声明。

原文链接：https://blog.csdn.net/zhouky1993/article/details/60953892

[quote=引用 2 楼 老大i 的回复:]
https://blog.csdn.net/zhouky1993/article/details/60953892

https://blog.csdn.net/zhouky1993/article/details/60953892

把TIdSMTP->Host设置为收件人的邮件服务器的主机即可，可以用Indy的DNS解析组件获取