Back to Collection Items
var
http: HCkHttp;
success: Boolean;
queryParams: HCkJsonObject;
resp: HCkHttpResponse;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := CkHttp_Create();
queryParams := CkJsonObject_Create();
CkJsonObject_UpdateInt(queryParams,'page',1);
CkJsonObject_UpdateInt(queryParams,'size',200);
// Adds the "Authorization: Bearer ACCESS_TOKEN_GOES_HERE" header.
CkHttp_putAuthToken(http,'ACCESS_TOKEN_GOES_HERE');
CkHttp_SetRequestHeader(http,'Accept','application/com.reloadly.giftcards-v1+json');
resp := CkHttp_QuickRequestParams(http,'GET','https://giftcards.reloadly.com/discounts',queryParams);
if (CkHttp_getLastMethodSuccess(http) = False) then
begin
Memo1.Lines.Add(CkHttp__lastErrorText(http));
Exit;
end;
Memo1.Lines.Add(IntToStr(CkHttpResponse_getStatusCode(resp)));
Memo1.Lines.Add(CkHttpResponse__bodyStr(resp));
CkHttpResponse_Dispose(resp);
CkHttp_Dispose(http);
CkJsonObject_Dispose(queryParams);
Curl Command
curl -G -d "page=1"
-d "size=200"
-H "Authorization: Bearer ACCESS_TOKEN_GOES_HERE"
-H "Accept: application/com.reloadly.giftcards-v1+json"
https://giftcards.reloadly.com/discounts
Postman Collection Item JSON
{
"name": "Discounts",
"request": {
"method": "GET",
"header": [
{
"key": "Authorization",
"value": "Bearer ACCESS_TOKEN_GOES_HERE",
"type": "text"
},
{
"key": "Accept",
"value": "application/com.reloadly.giftcards-v1+json",
"type": "text"
}
],
"url": {
"raw": "https://giftcards.reloadly.com/discounts?page=1&size=200",
"protocol": "https",
"host": [
"giftcards",
"reloadly",
"com"
],
"path": [
"discounts"
],
"query": [
{
"key": "page",
"value": "1"
},
{
"key": "size",
"value": "200"
}
]
}
},
"response": [
]
}