delphiAx / Reloadly API / Promotion By Operator Id
Back to Collection Items
var
http: TChilkatHttp;
success: Integer;
sbResponseBody: TChilkatStringBuilder;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := TChilkatHttp.Create(Self);
// Adds the "Authorization: Bearer ACCESS_TOKEN_GOES_HERE" header.
http.AuthToken := 'ACCESS_TOKEN_GOES_HERE';
http.SetRequestHeader('Accept','application/com.reloadly.topups-v1+json');
sbResponseBody := TChilkatStringBuilder.Create(Self);
success := http.QuickGetSb('https://topups.reloadly.com/promotions/operators/129',sbResponseBody.ControlInterface);
if (success = 0) then
begin
Memo1.Lines.Add(http.LastErrorText);
Exit;
end;
Memo1.Lines.Add('Response status code = ' + IntToStr(http.LastStatus));
Memo1.Lines.Add(sbResponseBody.GetAsString());
Curl Command
curl -X GET
-H "Authorization: Bearer ACCESS_TOKEN_GOES_HERE"
-H "Accept: application/com.reloadly.topups-v1+json"
https://topups.reloadly.com/promotions/operators/129
Postman Collection Item JSON
{
"name": "Promotion By Operator Id",
"request": {
"method": "GET",
"header": [
{
"key": "Authorization",
"value": "Bearer ACCESS_TOKEN_GOES_HERE",
"type": "text"
},
{
"key": "Accept",
"value": "application/com.reloadly.topups-v1+json",
"type": "text"
}
],
"url": {
"raw": "https://topups.reloadly.com/promotions/operators/129",
"protocol": "https",
"host": [
"topups",
"reloadly",
"com"
],
"path": [
"promotions",
"operators",
"129"
]
}
},
"response": [
]
}