如何用TClientSocket,TServerSocket传输文件?

[sailorcgh]

用TClientSocket,TServrSocket传输文件如何把文件名传输过去呢？
如何传文件呢？

[踏岸寻柳]

为什么不用TIdTCPServer、TIdTCPClient组件呢！

[liusamye]

事先发一个文件名过去，就可以了，ClientSocket1->Socket->SendText("文件名"),在ServerSocket端Socket->RecieveText就能收到，但事先要注意区分是在发文件还是发文件名。