Существуют ли примеры, показывающие, как Delphi вызывает сервер Active Directory Kerberos для запроса билета на получение билета / обычного билета?

Предыстория: билет необходим для аутентификации на веб-сервисе, который обменивается конфиденциальной информацией.

Изменить: пример с коротким исходным кодом был бы очень полезен. Я нашелJEDI Библиотека кодов безопасности Windows что очень впечатляет. Я не уверен, содержит ли он поддержку Kerberos.