delphi clientsocket、serversocket

客户端与服务器端通讯，客户端向服务器端发送信息，服务器端可以选择N多在线的任意一个客户端，向其发送信息。（尚存一些BUG，有完善此程序的高手，请发我一份gaojiuyuan_1227@163.com，谢谢！）

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        434  2009-06-04 16:23  server\Server.cfg

     文件       2014  2009-06-04 16:23  server\Server.dof

     文件        208  2009-06-01 10:21  server\Server.dpr

     文件     454656  2009-06-04 17:00  server\Server.exe

     文件        876  2009-06-01 10:13  server\Server.res

     文件        208  2009-06-01 10:21  server\Server.~dpr

     文件      10699  2009-06-04 17:00  server\uFrmServer.dcu

     文件         51  2009-06-04 17:00  server\uFrmServer.ddp

     文件       3206  2009-06-03 11:43  server\uFrmServer.dfm

     文件       6040  2009-06-04 17:00  server\uFrmServer.pas

     文件         51  2009-06-04 16:23  server\uFrmServer.~ddp

     文件       3206  2009-06-03 11:43  server\uFrmServer.~dfm

     文件       6052  2009-06-04 16:21  server\uFrmServer.~pas

     文件        434  2009-06-02 10:17  client\Client.cfg

     文件       2028  2009-06-02 10:17  client\Client.dof

     文件        208  2009-06-02 10:17  client\Client.dpr

     文件     526848  2009-06-04 15:51  client\Client.exe

     文件        876  2009-05-31 08:30  client\Client.res

     文件        208  2009-06-01 17:09  client\Client.~dpr

     文件      10083  2009-06-04 15:37  client\uFrmClient.dcu

     文件         51  2009-06-04 15:37  client\uFrmClient.ddp

     文件       3146  2009-06-04 15:31  client\uFrmClient.dfm

     文件       4993  2009-06-04 15:37  client\uFrmClient.pas

     文件         51  2009-06-04 15:37  client\uFrmClient.~ddp

     文件       3146  2009-06-04 15:31  client\uFrmClient.~dfm

     文件       4989  2009-06-04 15:37  client\uFrmClient.~pas

     目录          0  2009-06-04 17:00  server

     目录          0  2009-06-04 15:54  client

----------- ---------  ---------- -----  ----

              1044762                    28

............此处省略1个文件信息