anchor.diff:  begin
     FieldName := '';
     Value := TValue.Empty;
  +end;
  +
  +constructor TFormParam.Create(const AFieldName: string; const AValue: TValue);
  +begin
  +  Clear;
  +  FieldName := AFieldName;
  +  Value := AValue;
   end;
   
   constructor TFormParam.CreateFromRequest(const ARequest: TWebRequest;
  
positive.code:     procedure Clear;
      constructor CreateFromRequest(const ARequest: TWebRequest; const AFieldName: string); overload;
      constructor CreateFromRequest(const ARequest: TWebRequest; const AFileIndex: Integer); overload;
      function ToString: string;
    end;
  
  
negative.code:   CreateFromRequest(ARequest, LFileIndex);
  end;
  
  constructor TFormParamFile.Create(const AFieldName, AFileName: string;
    const ABytes: TBytes; const AContentType: string);
  begin
    FieldName := AFieldName;
    FileName := AFileName;
    Bytes := ABytes;
    ContentType := AContentType;
  end;
  
  constructor TFormParamFile.CreateFromRequest(const ARequest: TWebRequest;
    const AFileIndex: Integer);
  var
  