Delphi4中通过SMTP发送邮件的实现方法及Indy适配咨询

一、适配Delphi4的Indy组件相关说明 #

• Indy 8.x（早期Indy Sockets 8系列）是官方明确适配Delphi 4的版本，安装后使用逻辑和Delphi6环境下的Indy组件操作完全一致，直接调用IdSMTP、IdMessage组件即可完成SMTP发信逻辑开发。
• 不要尝试安装Indy 9及以上版本，从Indy9开始官方就终止了对Delphi4的兼容支持，强行安装编译会出现大量语法、API调用相关的错误，没有调试折腾的价值。

二、无可用Indy组件时的替代实现方案 #

如果找不到可用的Indy8安装包，可以选择以下几种经过长期项目验证的成熟方案：

• 方案1：使用Delphi4预装的FastNet组件。Delphi4默认自带的FastNet组件页中就有TNMSMTP组件，不需要额外安装任何第三方包，拖入窗体即可配置SMTP服务器地址、端口、收发件人信息、邮件正文及附件，是零额外依赖的最便捷方案。该组件的缺点是原生不支持SSL/TLS加密，对接当前主流公网邮箱常用的465、587加密端口时，需要额外适配SSL库才能正常连接。
• 方案2：调用Windows系统内置MAPI接口。不需要依赖任何第三方VCL组件，只需在代码中引入MAPI相关单元，即可调用系统默认邮件客户端的发信能力完成邮件投递，适合不需要后台静默发信、允许唤起本地邮件程序做交互的场景。
• 方案3：基于WinSock自行封装SMTP协议逻辑。SMTP本身是轻量文本协议，交互流程固定简单，基于Delphi4自带的WinSock单元，按照标准协议流程依次发送HELO/EHLO、身份认证、发件人声明、收件人声明、邮件内容传输、断开连接的对应指令即可实现功能，整体代码量不大，还可以根据需求灵活适配SSL加密层，可控性最高。
• 方案4：使用其他兼容Delphi4的老牌第三方组件。比如TurboPower AsyncPro组件包、适配Delphi4的早期版本ICS（Internet Component Suite）组件套件，都封装了成熟稳定的SMTP发信能力，经过二十多年的工业场景验证，兼容性和稳定性都有保障。

补充说明：当前主流公共邮箱服务基本都强制要求SMTP连接走SSL/TLS加密，无论选择上述哪种方案，如果需要对接公网邮箱发信，都需要提前准备适配Delphi4编译环境的OpenSSL库做加密层适配，否则会出现连接被服务端拒绝的问题。

内容的提问来源于stack exchange，提问作者pianto