serversocket 与多个clientsocket信息互发的例子，谁有？多线程的例子

Question

serversocket 与多个clientsocket信息互发的例子，谁有？多线程的例子
这个网络方面的好像没什么资料。。
找不到啊。、那位大大说说啊。
、

Answer 1

http://www.2ccc.com/article.asp?articleid=51391.C/S模式，采用组件TServerSockt/TClientSocket实现。
2.使用Socket阻塞模式和多线程。
3.可以在内网稳定的传送大文件(笔者测试：3-4G良好)（仅使用线程不宜过多）
4.本程序容错上做的很不够好，期待高手继续改进，当然只要你愿意。笔者希望看到IOCP式的改进出现
5.编写本程序参考了：罗小平《Delphi精要》第十章的文件传输程序的思路，在此致谢。
6.本程序使用的三方组件: suipackpro / TMS套件，本站均可下载到。
7.本源码自由使用。最后:如果你有改进，恳请发我一份 [email protected]盒子上的

Answer 2

delphi的demo本身就有啊！你可以参考：
目录Delphi7.0\demo\Internet\NetChat目录下的项目！