Socket 一对多通信
最近公司要做一个通信服务端，具体信息如下：

1、服务端侦听服务器上指定端口
2、一个服务端接收多个客户端连接请求
3、连接上客户端后接收其发送过来的数据，经过处理后存储到数据库
4、每个客户端间隔10秒钟发送一次数据，每次数据为 33 字节
5、客户端每10分钟断开重新连接一次

我这有个 Delphi 做的服务端，只用了4个线程。
我做的无论是同步还是异步都会开启很多线程，占用很大内存，运行时间长了使服务器运行很慢。

跪求大师们给点指点，小弟之前没做过Socket这方面。。。在线等的啊。。。
------最佳解决方案--------------------
说明你是没创建一个socket就开一个线程，delphi的是开4个线程，每个线程中管理一个socket列表
------其他解决方案--------------------
按需求
很明显是tcp连接
服务器端负责监听指定端口，每接收到一个连接，就开一个线程。
设置客户端的发送延迟，可用thread.sleep()来实现
------其他解决方案--------------------
socket udp广播 可以 等下给你代码
------其他解决方案--------------------

 /// <summary>

        /// 模拟发送端口5860

        /// </summary>

        private void send5860() 

        {

            try

            {

                Console.WriteLine("This is a Server, host name is {0}", Dns.GetHostName());



                Socket socks = new Socket(AddressFamily.InterNetwork, SocketType.Dgram, ProtocolType.Udp);//New一个Socket配置连接方式

                //socks.SetSocketOption(SocketOptionLevel.Socket, SocketOptionName.SendTimeout, 900); //设置响应时间

                IPEndPoint iep1 = new IPEndPoint(IPAddress.Broadcast, 5860); 

                while (true)

                {

                    Console.WriteLine("5860 Success" + " port：5860");

                    byte[] data = System.Text.Encoding.UTF8.GetBytes("5860 已经成功");   //将字符转化为可传输的格式

                    socks.SetSocketOption(SocketOptionLevel.Socket, SocketOptionName.Broadcast, 1);

                    socks.SendTo(data, iep1);

                    //socks.SendTo(data, iep2);



                    Thread.Sleep(500);

                }

            }

            catch(Exception ex)

            {