Delphi 7 Zugang Windows-X509-Zertifikatspeicher

Question

Meine Frage ist ziemlich einfach: gibt es eine einfache Möglichkeit, um Windows X509-Zertifikatspeicher mit Delphi 7

zuzugreifen

Bevor diese Frage habe ich gegoogelt, habe aber keine nützlichen Informationen gefunden.

Answer 1

ist der einfachste Weg CAPICOM zu verwenden, der Gewinn capi schlagen api direkt schmerzhaft ist.

sobald Sie das COM-Objekt registriert und erstellt Ihre typelib Einheit von it ..

öffnen Sie das entsprechende Geschäft, und von dort aus den Zertifikaten () -Methode verwenden ..

  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 Referenz unter http://msdn.microsoft.com/en -US / library / ms995332.aspx

Wenn Sie mit Geld ausgeben ok sind, dann habe ich gute Dinge über PKIBlackbox von eldos gehört.

Answer 2

Ist das nicht das, was du suchst? Cryptography Referenz

Oder suchen Sie einen API-Wrapper?

Answer 3

Es gibt eine komplexe Bibliothek Fom ELDOS , die für die Arbeit mit X509-Zertifikaten und vollständige Unterstützung hinzuzufügen; Lesen Sie die vollständige Beschreibung hier:
Komponenten für Public Key Infrastructure (PKI) Unterstützung

Sehen Sie die Referenz für die Klasse ElX509CertificateClass hier .

Viele Grüße.