我怎样才能得到一个Kerberos票据用Delphi？(How can I get a Kerber

是否有例子，说明如何德尔福调用的Active Directory Kerberos服务器请求票据授予票据/正常票吗？

背景：门票需要认证，其交换的机密信息的网络服务。

编辑：短源代码示例将是非常有益的。 我已经找到了JEDI的Windows安全代码库这是非常令人印象深刻。 我不知道这是否包含Kerberos支持。

Answer 1:

根据这个 ，你应该能够得到一个与的InitializeSecurityContext窗口API调用。

Answer 2:

首先阅读使用安全支持提供者接口Kerberizing应用程序获得的总体思路。 InitializeSecurityContext描述如下：

启动通过生成必须传递到服务器的安全令牌的安全上下文。 使用此功能的应用被称为SSPI客户端。

MSDN上的SSPI功能列表中可以找到认证功能 。

对于实际的示例代码，请参见Win32的样本的SSPI页面 。 你可能会发现client.cpp是有用的。 另一个类似的例子是GssClient.c 。 这两个代码在一个循环中运行它，因为如果对话不断去SEC_I_CONTINUE_NEEDED返回。

文章来源: How can I get a Kerberos ticket with Delphi?