anchor.diff:  
       FSpeed_WSASendResponse: Int64;
       FSpeed_WSARecvResponse: Int64;
  +    FSpeed_Recv:Int64;
   
       procedure incSentSize(pvSize:Cardinal);
       procedure incPostWSASendSize(pvSize:Cardinal);
  
positive.code: 
  
    FSpeed_WSARecvResponse := Trunc((self.FResponseWSARecvCounter - FLastSpeed_WSARecvResponse) / lvSec);
  
  end;
  
  procedure TIocpDataMonitor.SpeedCalcuStart;
  
negative.code:     // ¼ʼʱ_
      FLastSpeed_WSASendResponse: Int64;
      FLastSpeed_WSARecvResponse: Int64;
      FLastSpeed_RecvSize:Int64;
  
      FContextCreateCounter:Integer;
      FContextOutCounter:Integer;
  