web-services – 如何使用Delphi获取Kerberos票证？

是否有示例显示Delphi如何调用Active Directory Kerberos服务器来请求票证授予票证/普通票证？

背景：对于交换机密信息的Web服务进行身份验证需要该票证.

编辑：一个简短的源代码示例将非常有用.我发现JEDI Windows Security Code Library非常令人印象深刻.我不确定它是否包含对Kerberos的支持.

解决方法

根据 this,您应该可以使用 InitializeSecurityContext Windows API调用.