用Indy9发送邮件是件很方便的事,用IdSMTP控件和IdMessage控件结合起来就能轻而易举办到。首先在窗体上放一个IdMessage,这个控件是邮件主体,其中必须填的属性有4个:
idmsg1.Body.Assign(mmo1.Lines);//邮件内容主体
idmsg1.From.Address := ‘XXX@1XXX.com‘;//邮件从那里发来的,就是用来发邮件的地址
idmsg1.Recipients.EMailAddresses := XXX;//发给谁
idmsg1.Subject := edt2.Text;//主题;
只要填好这4个属性,然后再结合IdSMTP就能顺畅得发送邮件。