Это проблема аутентификации. Не уверен, как вы получили accessToken, но ошибка «Предоставленный маркер доступа истек, отозван или поврежден». Вам необходимо убедиться, что вы получили accessToken с правильной конечной точки, и это для правильной учетной записи. Если вы используете JWT - проверьте свой закрытый ключ RSA. Кроме того, код delphi немного устарел и использует API 2.0, вы должны использовать 2.1