请问Socket编程中，怎样在一个程序中同时实现客户端和服务器功能？

Question

也就是说怎么把客户端和服务器端2个程序合成一程序，这个程序没有服务器和客户端的区别？望高手指教！

Answer 1

程序开个端口起监听，接受别的客户端的连接，就是实现服务端功能。同时开个线程，定时扫描一个IP，直到连接上,就是实现客户端的功能。这样可以做转发。还有一种在《delphi7网络开发应用》里有例子，是用Indy实现的聊天工具，同时放TIdTCPServer, TIdTCPClient，互相连接通讯。