用Delphi的TIdHttp控件发起POST请求和Java的Servlet响应

最新推荐文章于 2023-03-04 09:27:42 发布

原创

最新推荐文章于 2023-03-04 09:27:42 发布 · 1.1w 阅读

9 ·

CC 4.0 BY-SA版权

本文介绍了如何使用Delphi的TIdHttp控件发起POST请求，并展示了Java Servlet如何处理该请求。在Delphi端，通过TStringList添加参数，发送请求到指定URL。服务端的Java代码通过HttpServletRequest获取参数并返回响应。同时，文章讨论了POST请求中中文参数的编码问题以及处理同名参数的方法。

使用Delphi的TIdHttp控件发起一个POST请求很简单，定义一个TStringList实例，往上面添加参数就行：

procedure TForm1.Button1Click(Sender: TObject);
var
HttpClient: TIdHttp;
ParamList: TStringList;
begin
HttpClient := TIdHttp.Create();
ParamList := TStringList.Create;
ParamList.Add('user=pan');
ShowMessage(HttpClient.Post('http://192.168.0.105:8080/Servlets/Submit', ParamList));
end;

运行代码，使用WireShark抓包工具看到这个POST请求发出来了，Content-Type是application/x-www-form-urlencoded，这种类型的意思是将参数打包成key-value的形式。