Indy Clients 面版里有IdSMTP,IdMessage组合使用就行了.
IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Host :=? // 邮件服务器
IdSMTP1.Port :=? // 端口
IdSMTP1.Username :=? //用户名
IdSMTP1.Password :=? //密码
IdSMTP1.Connect(5); //连接超时
IdMessage1.Subject:=? //主题
IdMessage1.Body.Append(Body); //添加类容
IdMessage1.From.Address :=fromEmail; //发件人邮件地址
IdMessage1.Recipients.EMailAddresses :=toEmail; // 收件人地址
TIdAttachment.Create(IdMessage1.MessageParts,附件路径);//发送附件,可发送多个
IdSMTP1.Send(IdMessage1);
怎么都在问发邮件啊???
这个试一试.