TClientSocket和TServerSocket，Delphi的例子(200分)

TClientSocket和TServerSocket，

Delphi的例子在哪啊......

Indy的Demo里面有，自己看吧。
http://www.delphibox.com/article.asp?articleid=1262

我要的不是这个是Indy 里面的,
是原来的...
TClientSocket和TServerSocket

d7以前是有的。后来ｄｅｌｐｈｉ不推荐使用了，所以ｄｅｍｏ也不带了，控件默认也不装了。以前有两个CHAT的例子的。要么你找找老版本，要么翻帮助自己写吧。也许，ｂｏｒｌａｎｄ的网站上还会有的。

上我的blog:http://www.rainstorey.com/blog

那我看错了呀，另给你一个地址：
http://www.delphibox.com/article.asp?articleid=2249
查找第8章的例子。
第8章 Socket编程

8.1 WinSock基础
8.1.1 TCP、UDP和IP协议
8.1.2 套接字(Socket)
8.1.3 客户/服务器模式
8.1.4 面向连接的协议套接字的调用
8.1.5 面向无连接协议的套接字的调用
8.2 利用Winsock API实现Socket编程
8.2.1 常用WinSockAPI函数
8.2.2 利用WinSockAPI实现Socket编程
8.3 利用组件实现Socket编程
8.3.1 TClientSocket组件
8.3.2 TServerSocket组件
8.3.3 远程抓屏示例
8.4 通讯中间件的制作
8.4.1 磁盘队列的实现
8.4.2 客户端和服务器端发送接收磁盘队列数据的套接字的建立
8.4.3 中间件的简单应用