Delphi REST API后期示例

发布时间：2020-12-15 04:15:35 所属栏目：大数据来源：网络整理

导读：有人可以使用Delphi 2005向API发布一个简单的 JSON POST请求示例.我发现了许多使用GET的示例,但API提供程序不允许通过HTTP GET发出请求,并且不支持URL编码参数. 我是调用REST服务的新手(过去使用过SOAP),如果您需要更多信息,请告诉我. 解决方法您只需使用In

有人可以使用Delphi 2005向API发布一个简单的 JSON POST请求示例.我发现了许多使用GET的示例,但API提供程序不允许通过HTTP GET发出请求,并且不支持URL编码参数.

我是调用REST服务的新手(过去使用过SOAP),如果您需要更多信息,请告诉我.

解决方法

您只需使用Indy的TIdHTTP组件并调用Post方法.将URL作为第一个参数传递,将JSON字符串作为第二个参数传递.像这样的东西：

procedure TForm1.Button1Click(Sender: TObject);

  var    jsonToSend:TStringList;
         http:TIDHttp;
  begin
  http := TIDHttp.Create(nil);
  http.HandleRedirects := true;
  http.ReadTimeout := 5000;
  jsonToSend:=TStringList.create;
  jsonToSend.Add('{ Your JSON-encoded request goes here }');
  Memo1.Lines.Text:=http.Post('http://your.restapi.url',jsonToSend);
  jsonToSend.Destroy;
  http.Destroy;
  end;
end.

我假设您已经能够对JSON进行编码和解码,并且您只是在询问如何使用Delphi执行HTTP帖子.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!