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