ListGraphqlApis delphiAx Example
var
rest: TChilkatRest;
success: Integer;
authAws: TChilkatAuthAws;
sbResponseBody: TChilkatStringBuilder;
respStatusCode: Integer;
jResp: TChilkatJsonObject;
apiId: WideString;
arn: WideString;
authenticationType: WideString;
AuthorizerResultTtlInSeconds: Integer;
AuthorizerUri: WideString;
IdentityValidationExpression: WideString;
CloudWatchLogsRoleArn: WideString;
ExcludeVerboseContent: Integer;
FieldLogLevel: WideString;
name: WideString;
AuthTTL: Integer;
ClientId: WideString;
IatTTL: Integer;
Issuer: WideString;
v_String: WideString;
urisString: WideString;
AppIdClientRegex: WideString;
AwsRegion: WideString;
DefaultAction: WideString;
UserPoolId: WideString;
wafWebAclArn: WideString;
xrayEnabled: Integer;
j: Integer;
count_j: Integer;
lambdaAuthorizerConfigAuthorizerResultTtlInSeconds: Integer;
lambdaAuthorizerConfigAuthorizerUri: WideString;
lambdaAuthorizerConfigIdentityValidationExpression: WideString;
openIDConnectConfigAuthTTL: Integer;
openIDConnectConfigClientId: WideString;
openIDConnectConfigIatTTL: Integer;
openIDConnectConfigIssuer: WideString;
userPoolConfigAppIdClientRegex: WideString;
userPoolConfigAwsRegion: WideString;
userPoolConfigUserPoolId: WideString;
nextToken: WideString;
i: Integer;
count_i: Integer;
begin
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
rest := TChilkatRest.Create(Self);
authAws := TChilkatAuthAws.Create(Self);
authAws.AccessKey := 'AWS_ACCESS_KEY';
authAws.SecretKey := 'AWS_SECRET_KEY';
// Don't forget to change the region to your particular region. (Also make the same change in the call to Connect below.)
authAws.Region := 'us-west-2';
authAws.ServiceName := 'appsync';
// SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
rest.SetAuthAws(authAws.ControlInterface);
// URL: https://appsync.us-west-2.amazonaws.com/
// Use the same region as specified above.
success := rest.Connect('appsync.us-west-2.amazonaws.com',443,1,1);
if (success <> 1) then
begin
Memo1.Lines.Add('ConnectFailReason: ' + IntToStr(rest.ConnectFailReason));
Memo1.Lines.Add(rest.LastErrorText);
Exit;
end;
rest.AddHeader('Content-Type','application/x-amz-json-1.1');
rest.AddHeader('X-Amz-Target','ListGraphqlApis');
sbResponseBody := TChilkatStringBuilder.Create(Self);
success := rest.FullRequestNoBodySb('GET','/v1/apis',sbResponseBody.ControlInterface);
if (success <> 1) then
begin
Memo1.Lines.Add(rest.LastErrorText);
Exit;
end;
respStatusCode := rest.ResponseStatusCode;
Memo1.Lines.Add('response status code = ' + IntToStr(respStatusCode));
if (respStatusCode <> 200) then
begin
Memo1.Lines.Add('Response Header:');
Memo1.Lines.Add(rest.ResponseHeader);
Memo1.Lines.Add('Response Body:');
Memo1.Lines.Add(sbResponseBody.GetAsString());
Exit;
end;
jResp := TChilkatJsonObject.Create(Self);
jResp.LoadSb(sbResponseBody.ControlInterface);
// The following code parses the JSON response.
// A sample JSON response is shown below the sample code.
// Use this online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
nextToken := jResp.StringOf('nextToken');
i := 0;
count_i := jResp.SizeOfArray('graphqlApis');
while i < count_i do
begin
jResp.I := i;
apiId := jResp.StringOf('graphqlApis[i].apiId');
arn := jResp.StringOf('graphqlApis[i].arn');
authenticationType := jResp.StringOf('graphqlApis[i].authenticationType');
AuthorizerResultTtlInSeconds := jResp.IntOf('graphqlApis[i].lambdaAuthorizerConfig.authorizerResultTtlInSeconds');
AuthorizerUri := jResp.StringOf('graphqlApis[i].lambdaAuthorizerConfig.authorizerUri');
IdentityValidationExpression := jResp.StringOf('graphqlApis[i].lambdaAuthorizerConfig.identityValidationExpression');
CloudWatchLogsRoleArn := jResp.StringOf('graphqlApis[i].logConfig.cloudWatchLogsRoleArn');
ExcludeVerboseContent := jResp.IntOf('graphqlApis[i].logConfig.excludeVerboseContent');
FieldLogLevel := jResp.StringOf('graphqlApis[i].logConfig.fieldLogLevel');
name := jResp.StringOf('graphqlApis[i].name');
AuthTTL := jResp.IntOf('graphqlApis[i].openIDConnectConfig.authTTL');
ClientId := jResp.StringOf('graphqlApis[i].openIDConnectConfig.clientId');
IatTTL := jResp.IntOf('graphqlApis[i].openIDConnectConfig.iatTTL');
Issuer := jResp.StringOf('graphqlApis[i].openIDConnectConfig.issuer');
v_String := jResp.StringOf('graphqlApis[i].tags.string');
urisString := jResp.StringOf('graphqlApis[i].uris.string');
AppIdClientRegex := jResp.StringOf('graphqlApis[i].userPoolConfig.appIdClientRegex');
AwsRegion := jResp.StringOf('graphqlApis[i].userPoolConfig.awsRegion');
DefaultAction := jResp.StringOf('graphqlApis[i].userPoolConfig.defaultAction');
UserPoolId := jResp.StringOf('graphqlApis[i].userPoolConfig.userPoolId');
wafWebAclArn := jResp.StringOf('graphqlApis[i].wafWebAclArn');
xrayEnabled := jResp.IntOf('graphqlApis[i].xrayEnabled');
j := 0;
count_j := jResp.SizeOfArray('graphqlApis[i].additionalAuthenticationProviders');
while j < count_j do
begin
jResp.J := j;
authenticationType := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].authenticationType');
lambdaAuthorizerConfigAuthorizerResultTtlInSeconds := jResp.IntOf('graphqlApis[i].additionalAuthenticationProviders[j].lambdaAuthorizerConfig.authorizerResultTtlInSeconds');
lambdaAuthorizerConfigAuthorizerUri := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].lambdaAuthorizerConfig.authorizerUri');
lambdaAuthorizerConfigIdentityValidationExpression := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].lambdaAuthorizerConfig.identityValidationExpression');
openIDConnectConfigAuthTTL := jResp.IntOf('graphqlApis[i].additionalAuthenticationProviders[j].openIDConnectConfig.authTTL');
openIDConnectConfigClientId := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].openIDConnectConfig.clientId');
openIDConnectConfigIatTTL := jResp.IntOf('graphqlApis[i].additionalAuthenticationProviders[j].openIDConnectConfig.iatTTL');
openIDConnectConfigIssuer := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].openIDConnectConfig.issuer');
userPoolConfigAppIdClientRegex := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].userPoolConfig.appIdClientRegex');
userPoolConfigAwsRegion := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].userPoolConfig.awsRegion');
userPoolConfigUserPoolId := jResp.StringOf('graphqlApis[i].additionalAuthenticationProviders[j].userPoolConfig.userPoolId');
j := j + 1;
end;
i := i + 1;
end;
// A sample JSON response body parsed by the above code:
// {
// "graphqlApis": [
// {
// "additionalAuthenticationProviders": [
// {
// "authenticationType": "string",
// "lambdaAuthorizerConfig": {
// "authorizerResultTtlInSeconds": number,
// "authorizerUri": "string",
// "identityValidationExpression": "string"
// },
// "openIDConnectConfig": {
// "authTTL": number,
// "clientId": "string",
// "iatTTL": number,
// "issuer": "string"
// },
// "userPoolConfig": {
// "appIdClientRegex": "string",
// "awsRegion": "string",
// "userPoolId": "string"
// }
// }
// ],
// "apiId": "string",
// "arn": "string",
// "authenticationType": "string",
// "lambdaAuthorizerConfig": {
// "authorizerResultTtlInSeconds": number,
// "authorizerUri": "string",
// "identityValidationExpression": "string"
// },
// "logConfig": {
// "cloudWatchLogsRoleArn": "string",
// "excludeVerboseContent": boolean,
// "fieldLogLevel": "string"
// },
// "name": "string",
// "openIDConnectConfig": {
// "authTTL": number,
// "clientId": "string",
// "iatTTL": number,
// "issuer": "string"
// },
// "tags": {
// "string": "string"
// },
// "uris": {
// "string": "string"
// },
// "userPoolConfig": {
// "appIdClientRegex": "string",
// "awsRegion": "string",
// "defaultAction": "string",
// "userPoolId": "string"
// },
// "wafWebAclArn": "string",
// "xrayEnabled": boolean
// }
// ],
// "nextToken": "string"
// }
