anchor.diff:      try
         if FCurrentSendBufferLink = nil then
         begin
  -        UnLock; //ӽ
           if FSendBlock <> nil then
           begin
             FreeMemBlock(FSendBlock);
  
positive.code:             FreeMemBlock(FSendBlock);
              FSendBlock := nil;
            end;
            UnLock;
            Exit;
          end;
          goto ReDo;
  
negative.code:       if (lvValidCount = 0) or (lvMemBlock = nil) then
        begin  // ûҪ͵
          FCurrentSendBufferLink := nil;  // û, ´ѹʱִͷ
          exit;      
        end; 
      end;
  