Back to Collection Items
var
http: TChilkatHttp;
success: Integer;
json: TChilkatJsonObject;
resp: IChilkatHttpResponse;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := TChilkatHttp.Create(Self);
// Use this online tool to generate code from sample JSON: Generate Code to Create JSON
// The following JSON is sent in the request body.
// {
// "query": "query IntrospectionQuery {\n __schema {\n queryType {\n name\n }\n mutationType {\n name\n }\n subscriptionType {\n name\n }\n types {\n ...FullType\n }\n directives {\n name\n description\n args {\n ...InputValue\n }\n onOperation\n onFragment\n onField\n locations\n }\n }\n}\nfragment FullType on __Type {\n kind\n name\n description\n fields(includeDeprecated: true) {\n name\n description\n args {\n ...InputValue\n }\n type {\n ...TypeRef\n }\n isDeprecated\n deprecationReason\n }\n inputFields {\n ...InputValue\n }\n interfaces {\n ...TypeRef\n }\n enumValues(includeDeprecated: true) {\n name\n description\n isDeprecated\n deprecationReason\n }\n possibleTypes {\n ...TypeRef\n }\n}\nfragment InputValue on __InputValue {\n name\n description\n type {\n ...TypeRef\n }\n defaultValue\n}\nfragment TypeRef on __Type {\n kind\n name\n ofType {\n kind\n name\n ofType {\n kind\n name\n ofType {\n kind\n name\n }\n }\n }\n}\n",
// "variables": ""
// }
json := TChilkatJsonObject.Create(Self);
json.UpdateString('query','query IntrospectionQuery {' + #10 + ' __schema {' + #10 + ' queryType {' + #10 + ' name' + #10 + ' }' + #10 + ' mutationType {' + #10 + ' name' + #10 + ' }' + #10 + ' subscriptionType {' + #10 + ' name' + #10 + ' }' + #10 + ' types {' + #10 + ' ...FullType' + #10 + ' }' + #10 + ' directives {' + #10 + ' name' + #10 + ' description' + #10 + ' args {' + #10 + ' ...InputValue' + #10 + ' }' + #10 + ' onOperation' + #10 + ' onFragment' + #10 + ' onField' + #10 + ' locations' + #10 + ' }' + #10 + ' }' + #10 + '}' + #10 + 'fragment FullType on __Type {' + #10 + ' kind' + #10 + ' name' + #10 + ' description' + #10 + ' fields(includeDeprecated: true) {' + #10 + ' name' + #10 + ' description' + #10 + ' args {' + #10 + ' ...InputValue' + #10 + ' }' + #10 + ' type {' + #10 + ' ...TypeRef' + #10 + ' }' + #10 + ' isDeprecated' + #10 + ' deprecationReason' + #10 + ' }' + #10 + ' inputFields {' + #10 + ' ...InputValue' + #10 + ' }' + #10 + ' interfaces {' + #10 + ' ...TypeRef' + #10 + ' }' + #10 + ' enumValues(includeDeprecated: true) {' + #10 + ' name' + #10 + ' description' + #10 + ' isDeprecated' + #10 + ' deprecationReason' + #10 + ' }' + #10 + ' possibleTypes {' + #10 + ' ...TypeRef' + #10 + ' }' + #10 + '}' + #10 + 'fragment InputValue on __InputValue {' + #10 + ' name' + #10 + ' description' + #10 + ' type {' + #10 + ' ...TypeRef' + #10 + ' }' + #10 + ' defaultValue' + #10 + '}' + #10 + 'fragment TypeRef on __Type {' + #10 + ' kind' + #10 + ' name' + #10 + ' ofType {' + #10 + ' kind' + #10 + ' name' + #10 + ' ofType {' + #10 + ' kind' + #10 + ' name' + #10 + ' ofType {' + #10 + ' kind' + #10 + ' name' + #10 + ' }' + #10 + ' }' + #10 + ' }' + #10 + '}' + #10);
json.UpdateString('variables','');
// Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken := '<access_token>';
http.SetRequestHeader('X-Chatter-Entity-Encoding','false');
resp := http.PostJson3('https://domain.com/services/data/v{{version}}/graphql','application/json',json.ControlInterface);
if (http.LastMethodSuccess = 0) then
begin
Memo1.Lines.Add(http.LastErrorText);
Exit;
end;
Memo1.Lines.Add(IntToStr(resp.StatusCode));
Memo1.Lines.Add(resp.BodyStr);
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-H "X-Chatter-Entity-Encoding: false"
--data-raw '{"query":"query IntrospectionQuery {\n __schema {\n queryType {\n name\n }\n mutationType {\n name\n }\n subscriptionType {\n name\n }\n types {\n ...FullType\n }\n directives {\n name\n description\n args {\n ...InputValue\n }\n onOperation\n onFragment\n onField\n locations\n }\n }\n}\nfragment FullType on __Type {\n kind\n name\n description\n fields(includeDeprecated: true) {\n name\n description\n args {\n ...InputValue\n }\n type {\n ...TypeRef\n }\n isDeprecated\n deprecationReason\n }\n inputFields {\n ...InputValue\n }\n interfaces {\n ...TypeRef\n }\n enumValues(includeDeprecated: true) {\n name\n description\n isDeprecated\n deprecationReason\n }\n possibleTypes {\n ...TypeRef\n }\n}\nfragment InputValue on __InputValue {\n name\n description\n type {\n ...TypeRef\n }\n defaultValue\n}\nfragment TypeRef on __Type {\n kind\n name\n ofType {\n kind\n name\n ofType {\n kind\n name\n ofType {\n kind\n name\n }\n }\n }\n}\n","variables":""}'
https://domain.com/services/data/v{{version}}/graphql
Postman Collection Item JSON
{
"name": "Introspection Query",
"request": {
"method": "POST",
"header": [
{
"key": "X-Chatter-Entity-Encoding",
"value": "false",
"type": "text"
}
],
"body": {
"mode": "graphql",
"graphql": {
"query": "query IntrospectionQuery {\n __schema {\n queryType {\n name\n }\n mutationType {\n name\n }\n subscriptionType {\n name\n }\n types {\n ...FullType\n }\n directives {\n name\n description\n args {\n ...InputValue\n }\n onOperation\n onFragment\n onField\n locations\n }\n }\n}\nfragment FullType on __Type {\n kind\n name\n description\n fields(includeDeprecated: true) {\n name\n description\n args {\n ...InputValue\n }\n type {\n ...TypeRef\n }\n isDeprecated\n deprecationReason\n }\n inputFields {\n ...InputValue\n }\n interfaces {\n ...TypeRef\n }\n enumValues(includeDeprecated: true) {\n name\n description\n isDeprecated\n deprecationReason\n }\n possibleTypes {\n ...TypeRef\n }\n}\nfragment InputValue on __InputValue {\n name\n description\n type {\n ...TypeRef\n }\n defaultValue\n}\nfragment TypeRef on __Type {\n kind\n name\n ofType {\n kind\n name\n ofType {\n kind\n name\n ofType {\n kind\n name\n }\n }\n }\n}\n",
"variables": ""
}
},
"url": {
"raw": "{{_endpoint}}/services/data/v{{version}}/graphql",
"host": [
"{{_endpoint}}"
],
"path": [
"services",
"data",
"v{{version}}",
"graphql"
]
}
},
"response": [
]
}
