procedure TForm1.Button1Click(Sender: TObject);
  Send_发送数据: TSTringList;
  Ret_答复数据流: TStringStream;
  Ret_答复字符串: string;
begin
  Send_发送数据 := TStringList.Create;
  Ret_答复数据流 := TStringStream.Create;
    NetHTTPClient1.ContentType :=
      'application/x-www-form-urlencoded; charset=UTF-8';
    //提交的数据
    Send_发送数据.Add('grant_type=client_**********');
    Send_发送数据.Add('client_id=*************');
    Send_发送数据.Add('client_secret=**********');
        //多行可以填加
    NetHTTPClient1.Post('https://*******************',
      Send_发送数据, Ret_答复数据流);
        //获取网页返回的信息
    Ret_答复字符串 := Ret_答复数据流.DataString;
    Ret_答复字符串 := UTF8Decode(Ret_答复字符串);
    Memo1.Text := Ret_答复字符串;
  finally
    Ret_答复数据流.Free;
    Send_发送数据.Free;
-------------添加Authorization
 
NetHTTPClient.CustomHeaders['Authorization']:='Bearer ************';
 
测试环境：delphi xe10.3
				
1.SendNotification.jsp：发送通知页面，表单提交数据的类型为multipart/x-www-form-urlencoded
2.RecvNotification.jsp：接收通知页面
3.页面简单使用了Bootstrap样式
4.开发工具使用IDEA
					你要明白，任何问题都不是孤立存在的，一定有人曾经遇到过，并且已经有更好的解决办法了，只是我还不知道。我不应该在黑暗中独自前行，去重新发明轮子，也许我的顿悟，只是别人的基本功！我应该要站在巨人的肩膀上，学习更成熟的经验和方法，然后再来解决这个问题
					03-04
 getUserList:function(){
          $.ajax({
               type:"post",
               url:this.api.userListUr
FORM元素的enctype属性指定了表单数据向服务器提交时所采用的编码类型，默认的缺省值是“application/x-www-form-urlencoded”。
    然而，在向服务器发送大量的文本、包含非ASCII字符的文本或二进制数据时这种编码方式效率很低。
    在文件上载时，所使用的编码类型应当是“multipart/form-data”，它既可以发送文本数据，也支持二进制数...
				
Delphi 是一种编程语言，而 NetHttpClient 是 Delphi 中的一个网络库，用于向服务器发送 HTTP 请求并接收响应。使用 NetHttpClient 这款库，我们可以轻松地发送 GET、POST、DELETE、PUT 等不同类型的请求，并支持自定义请求头和请求体等功能。
在使用 NetHttpClient 发送请求的过程中，我们可以通过设置参数将请求的返回结果格式指定为 JSON 格式。同时，我们还可以使用 Delphi 的 JSON 解析库来解析从服务器返回的 JSON 数据，以便对数据进行处理和展示等操作。在 Delphi 中常用的 JSON 解析库包括 SuperObject、JsonDataObjects 等。
总结来说，使用 Delphi 中的 NetHttpClient 库和 JSON 解析库，我们可以轻松地发送 HTTP 请求，获取服务器返回的 JSON 数据，并对其进行解析和处理。这使得我们可以在 Delphi 中方便地与各种 API 接口进行通信，并将获取到的数据集成到自己的应用程序中，为用户提供更为丰富的功能和服务。