Delphi 邮件发送示例 含源码文件.rar

一个简单的Delphi7.0邮件发送示例含源码文件，将窗口中的邮件主题、收件人、邮件标题、邮件地址等信息填写完毕后，单击按钮即可发送邮件，基于SMTP发邮件的例子。部分代码段先睹为快： 　　Clear; 　　Subject:=Edit2.Text;//邮件主题 　　From.Text:=Edit4.Text;//发件人 　　Recipients.EMailAddresses:=Edit3.Text;//收件人 　　Body.Assign(Memo1.Lines);//邮件内容 　　ifEdit7.Text=''then//添加附件 　　TIdAttachment.C