Question

I am using Indy10. My server is processing a form post. ARequestInfo.FormParams properly contains the unparsed form parameters. But ARequestInfo.Params.count is 0. Is there a way I can have ARequestInfo.Params have the parsed form parameters? Or is there a way to parse ARequestInfo.FormParams?

It seems I have to write my own parsing routine when this should already be encapsulated in the object. Or perhaps I am missing a method.

Update Doing some more digging I have found when doing a post within our LAN everything works ok. But when the post is done from a browser outside of our LAN it does not.

Answer 1

Try to set the ParseParams property at your TIdHTTPServer.

Or you can make a descendant of the TIdHTTPRequestInfo class for accessing the protected method named DecodeAndSetParams to parse the parameters by yourself.

Here is the example.

uses
  IdCustomHTTPServer;

type
  THTTPRequest = class(TIdHTTPRequestInfo);

procedure TForm1.Button1Click(Sender: TObject);
var
  Request: THTTPRequest;
begin
  Request := THTTPRequest.Create;
  Request.DecodeAndSetParams('firstparam=1&secondparam=2&thirdparam=3');

  ShowMessage('Param count: ' + IntToStr(Request.Params.Count) +
              sLineBreak + sLineBreak +
              Request.Params[0] + sLineBreak +
              Request.Params[1] + sLineBreak +
              Request.Params[2] + sLineBreak
              );

  Request.Free;
end;