Delphi 7访问Windows X509证书库

Question

我的问题很简单：有没有一种使用Delphi 7访问Windows X509证书库的简单方法？

在提出这个问题之前，我用谷歌搜索过，但没有找到任何有用的信息。

Answer 1

最简单的方法是使用capicom，直接击中win capi api是痛苦的。

一旦你注册了com对象并从中创建了你的typelib单元..

打开相应的商店，然后使用certificates（）方法..

  var
    store: TStore;
    certificates: ICertificates;
    certificate: ICertificate2

  store := TStore.Create(nil);
  store.Open(CAPICOM_CURRENT_USER_STORE, 'My', CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED or CAPICOM_STORE_OPEN_INCLUDE_ARCHIVED or CAPICOM_STORE_OPEN_EXISTING_ONLY);

  certificates := store.Certificates;
  for i := 1 to certificates.count do
  begin
    certificate := IInterface(certificates.Item[i]) as ICertificate2;
    // work with the cert
  end;

  store.close();
  store.Free;

capicom参考位于 http://msdn.microsoft.com/en -us /库/ ms995332.aspx

如果你花钱可以，我从eldos那里听说过有关PKIBlackbox的好消息。

Answer 2

这不是你想要的吗？ 加密参考

或者你搜索API Wrapper？

Answer 3

ELDOS 中有一个复杂的库，可以为使用X509证书等提供全面的支持;阅读完整说明：
公钥基础结构（PKI）支持组件

请参阅ElX509CertificateClass类的参考资料此处。

问候。