互联上如何缩短TSocketConnection 连接时间

我是在internet 上应用TSocketConnection链接服务端。经过调试发现是在Data := FSendDataBlock.Send(Data, True)等待的时间超过6s-11s;客户还嫌慢，请问应该怎样缩短等待时间，。

解决方案 »

  1.   

    应用服务器10M光纤带宽，不发送其它数据，只是运行TSocketConnection1.Connected:=true，时间也是这么长
      

  2.   

    如果不是大数据量的传输， 代码的影响和网络的影响来比的话，网络的影响大得多
    代码能做的， 优化包的设计， 尽可能少
    Data := FSendDataBlock.Send 正常情况下不会这么慢的，可以先检查下网络 
      

  3.   

    问题是在本机上SocketConnection1.address用公网IP也是这个时间，用127.0.0.1则时间缩短为毫秒级。
      

  4.   

    127.0.0.1 直接就连的就是本机地址
    本机上SocketConnection1.address 用公网IP， 要到外网绕一圈，再到你路由，路由再到你本机上来的以前记得有个命令可以查网络各个阶段耗时的
      

  5.   

    传动数据不大，只是SocketConnection1.Connected:=true;返回等待时间就超过10s
      

  6.   

    是不是每次有数据更新或取数时才设为SocketConnection1.Connected=true用完后才改成false。这样动态连接呢