anchor.diff:  begin
     inherited Create;
     FData := TMemoryStream.Create();
  -  FHeader := TMemoryStream.Create();
  +  FHeader := TDValueNode.Create(vntObject);
     FCookies := TList.Create();
   end;
   
  
positive.code: end;
  
  procedure TDiocpHttpRequest.SendResponse;
  begin
    FDiocpContext.PostWSASendRequest(FResponse.Header.Memory, FResponse.Header.Size);
    if FResponse.Data.Size > 0 then
    begin
      FDiocpContext.PostWSASendRequest(FResponse.FData.Memory, FResponse.FData.Size);
    end;
  end;
  
  procedure TDiocpHttpRequest.WriteRawHeaderBuffer(const buffer: Pointer; len:
      Integer);
  begin
    FRawHeaderData.WriteBuffer(buffer^, len);
  end;
  
  procedure TDiocpHttpResponse.Clear;
  
negative.code: 
      property Data: TMemoryStream read FData;
  
      property Header: TDValueNode read FHeader;
  
      property HttpCodeStr: String read FHttpCodeStr write FHttpCodeStr;
  
  