求！！ 谁能给我个 Delphi的服务端和客户端之间通信的例子（代码）！！！

能实现服务端能同时接收多个客户端发来的文件（收发文件用TCP），客户端与客户端之间能实现用UDP的文件传输。

解决方案 »

  1.   

    使用clientsocket 与serversocket 控件
    服务器端使用serversocket 控件
      

  2.   

    我先能实现单个客户端和服务端的通信  但是当有两个以上的客户端同时给服务端发文件的时候  服务端就会出现错误   因为  serversocket只有一个read函数  我都是放在这下面来处理收到的包  我知道这样不行  但是我就是不知道怎么用多线程或者其他的方式来处理   求高手解答
      

  3.   

    两个同时给服务器发送是没有错误的啊！
     serversocket的read事件本来就是多线程的！即便是同时发，Read事件也是处理一个到一个。如果你非要线程，那就写一个线程解决嘛。在Read事件里建立Theadcreate(false);
      

  4.   

    用组件写很简单 但是不可控制
    自己定协议 自己用API写就很复杂 要多看书 但是可控！
    自己多练习，多研究！
      

  5.   

    只能通过列表来处理，限制同时2-3个人传输。
    FTP软件用过吧？队列最大数量是有限制的，好像是5个。
    你可以做个列表来处理用户投递的上传申请。审核通过后在列表里进行记录，并通过ID的识别来分配写入哪个文件。
    如果你最大要允许同时发送5份文件，那你要申请5个内存。
      

  6.   

    可以 去下载
    http://download.csdn.net/source/15198
      

  7.   

    我问下  server端的read函数可以并行处理吧  那如果我对每个客户端的发送的文件进行区分 是不是就可以同时read接收多个客户端发送来的文件呢？？？利用record类型的结构进行记录！
      

  8.   

    有完整功能：
    http://topic.csdn.net/u/20101128/08/5b876b05-74c3-4ed6-80bc-d3ec733c26be.html?12656
      

  9.   

    http://topic.csdn.net/u/20101128/08/5b876b05-74c3-4ed6-80bc-d3ec733c26be.html?12656 上不去啊