delphi发邮件代码

用delphi写的一个收发邮件小程序，带源代码。