anchor.diff:    Response.CharSet := 'utf-8';
   end;
   
  -{.$IFDEF FPC}
  +{$IFDEF FPC}
   // based on https://stackoverflow.com/questions/24861793
   // using Indy IdCustomHTTPServer rev 5498
   procedure MyDecodeAndSetParams(ARequestInfo: TIdHTTPRequestInfo);
  
positive.code:     ARequestInfo.Params.EndUpdate;
    end;
  end;
  {.$ENDIF}
  
  procedure TFormPage.OnPost(Request: TdjRequest;
    Response: TdjResponse);
  
negative.code: implementation
  
  uses
    {$IFDEF FPC}
    IdCustomHTTPServer, IdGlobal, IdURI, IdGlobalProtocols,
    {$ENDIF}
    BindingFramework;
  
  { TFormPage }
  