これでできた!
使うコンポーネントは、TRESTClient、TRESTRequestです。
似ていますが、TNetHTTPClientやTNetHTTPRequestは使いません。
uses REST.Types;//これ以外のusesはコンポーネント追加時に入ってくる。
procedure TForm2.Button2Click(Sender: TObject); var jsRequest: TJSONObject; u8BearerToken:UTF8String; begin RESTClient1.BaseURL := 'https://xxxxxxxxxx.execute-api.ap-northeast-1.amazonaws.com/v1/'; RESTRequest1.Resource := 'monitoring/logregister'; RESTRequest1.Method := TRESTRequestMethod.rmPOST; jsRequest := TJSONObject.Create(); jsRequest.AddPair('UserName', 'un'); jsRequest.AddPair('Password', 'pw'); RESTRequest1.AddBody(jsRequest); u8BearerToken:='Bearer XXXXXXXX'; RESTRequest1.Params.AddHeader('Authentication', u8BearerToken); RESTRequest1.Execute; jsRequest.Free(); end;
パースも含めて参考になるのは、このサイトですね。
www.gesource.jp
【以降、検討過程】
Delphi XE8以降にあるTNetHTTPRequestコンポーネントとTNetHTTPClientコンポーネントという、2つのコンポーネントが重要っぽい。
d.hatena.ne.jp
www.gesource.jp
過去にもいろいろ調べていたみたい。。。
serverless.hateblo.jp
serverless.hateblo.jp
DelphiからAWS API Gatewayへのテスト送信が上手くいかない。。。
このツールからAWSへの送信は上手くいくのだけど、、、
POSTメソッドのテストツール