json - 如何使用带有服务器令牌的 REST 客户端

Question

我慢慢地完成了 HMRC 教程，现在我陷入了第二个例子：

/hello/application

https://developer.service.hmrc.gov.uk/api-documentation/docs/tutorials

我已在 HMRC 注册并获得了“服务器令牌”。这用于/hello/application但我尝试了 13 种不同的代码变体，但我得到的是：

{"code":"MISSING_CREDENTIALS","message":"未提供身份验证信息"}

这是我尝试过的 1 个实例：

procedure TfrmMain.btnHello_Application_RESTClient_TestClick(Sender: TObject);
var
  jValue: TJSONValue;
begin
  MemoContent.Lines.Clear;
  RESTClient1.BaseURL := 'https://test-api.service.hmrc.gov.uk/hello/application';
  RESTRequest1.Params.Clear;
  RESTRequest1.Params.AddItem('Accept', 'application/vnd.hmrc.1.0+json');
  RESTRequest1.Params.AddItem('Authorization', 'Bearer ' +   eHello_Application_Server_Token.Text, pkHTTPHEADER, []);           
  RESTRequest1.Execute;

  jValue := RESTResponse1.JSONValue;
  MemoContent.Text := jValue.ToString;
end;

知道如何在 Delphi 中使用带有服务器令牌的 REST 客户端作为带有 Bearer 类型的授权标头吗？

标签： jsondelphirest-client