Delphi7.0基于WinSock创建一个CS结构的文件传输服务，有客户端和服务端，程序运行时，先运行服务端，然后指定端口，要和客户端对应，主机IP地址会自动获龋在传输文件时，会有提示，每一步操作几乎都有提示。本源码是研究Delphi下的winsock应用的好范例。