anchor.diff:  
       procedure SetWSASendBufferSize(const Value: Cardinal);
   
  -  private    
  +  private
  +    FNoDelayOption: Boolean;
   
       /// <summary>
       ///   ȡǰ
  
positive.code:       InnerAddToDebugStrings(Format('[%s]:*(%d):(%d:objAddr:%d) %s',
          [NowString, FReferenceCounter, self.SocketHandle, IntPtr(Self), 'DoConnected:ӵб']));
  
  
        if self.LockContext('OnConnected', Self) then
        try
  
negative.code:     procedure BindingEngine(const pvEngine:TIocpEngine);
  
      function GetDebugString: String;
  
  
      /// <summary>
      ///   NoDelay(Ĭfalse)
      ///   ΪtrueǻSocketNoDelay(nagle㷨)
      ///   nagle㷨200msҵʱ
      ///   ʱʱıĸԣѾ(ԺЧ)
      ///
      ///   Ϊ˼ӵƵģȴ㹻ݲŷͳȥû㹻ݣͻȴԼ200msڲʱʱͳȥ
      /// </summary>
      property NoDelayOption: Boolean read FNoDelayOption write FNoDelayOption;
  
    public
      procedure IncOperaOptions(const pvFlag:Integer);
  