TIdHTTPRequestInfo.FormParams in name/value pair - delphi

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;