Consegui resolver. Fica aqui a solução, caso alguém tenha o mesmo problema. Pode fechar o tópico.
SOLUÇÃO:
try
retorno := TstringStream.Create;
params := nil;
responseres := TStringlist.Create;
//--------------------------------
IdHttp1.Request.CustomHeaders.Clear;
IdHttp1.Request.CustomHeaders.Values['Authorization'] := 'Bearer ' + txtAccessToken.Text;
IdHttp1.Request.CustomHeaders.Values['x-integration-key'] := 'GYBtKWR5QjSwVxXXXxxXxXeUeOsUe0nOuc8HyTnyT1s';
IdHttp1.Request.CustomHeaders.Values['Content-Length'] := '0';
IdHttp1.Request.CustomHeaders.Values['Accept'] := '*/*';
IdHttp1.Request.CustomHeaders.Values['Accept-Encoding'] := 'gzip, deflate, br';
IdHttp1.Request.CustomHeaders.Values['Connection'] := 'keep-alive';
//--------------------------------
IdHTTP1.Request.ContentType := 'application/json';
IdHTTP1.Request.Charset := 'utf-8';
//--------------------------------
IdHTTP1.Post('https://api.onvio.com.br/dominio/integration/v1/activation/enable', params, retorno);
JsonResponse := TJSONObject.ParseJsonValue(UTF8Decode(retorno.DataString)) as TJSONObject;
IntegrationKey.Text := JsonResponse.GetValue<string>('integrationKey');
MemoJson.Lines.Text := FormatJSON(retorno.DataString);
JsonToDataset(FDMemTable1, '['+retorno.DataString+']');
finally
params.Free;
responseres.Free;
retorno.Free;
JsonResponse.Free;
end;