Back to Collection Items
var
http: HCkHttp;
success: Boolean;
sbResponseBody: HCkStringBuilder;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := CkHttp_Create();
CkHttp_putBasicAuth(http,True);
CkHttp_putLogin(http,'{{webservice_key}}');
CkHttp_putPassword(http,'password');
sbResponseBody := CkStringBuilder_Create();
success := CkHttp_QuickGetSb(http,'https://localhost:8080/api/articles',sbResponseBody);
if (success = False) then
begin
Memo1.Lines.Add(CkHttp__lastErrorText(http));
Exit;
end;
Memo1.Lines.Add('Response status code = ' + IntToStr(CkHttp_getLastStatus(http)));
Memo1.Lines.Add(CkStringBuilder__getAsString(sbResponseBody));
CkHttp_Dispose(http);
CkStringBuilder_Dispose(sbResponseBody);
Curl Command
curl -X GET
-u '{{webservice_key}}:password'
https://localhost:8080/api/articles
Postman Collection Item JSON
{
"name": "Get all articles",
"request": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{webservice_url}}/api/articles",
"host": [
"{{webservice_url}}"
],
"path": [
"api",
"articles"
]
}
},
"response": [
]
}