求用winsock.pas发送email实例！

求用winsock.pas（MS的标准函数，不是用tcpserver或socket控件），
发送email实例！用WSAStartUP,socket,bind等函数
有些问题实在看不懂，最好有详细的注释或者有相关的文档?谢谢了.
(注:使用标准的Winsock.pas,不是用控件)