Delphi 7 accede all'archivio certificati di Windows X509

Question

La mia domanda è piuttosto semplice: esiste un modo semplice per accedere all'archivio certificati di Windows X509 utilizzando Delphi 7?

Prima di porre questa domanda ho cercato su Google, ma non ho trovato informazioni utili.

Answer 1

il modo più semplice è usare il capicom, colpire direttamente i capi api è doloroso.

dopo aver registrato l'oggetto com e creato l'unità typelib da esso ..

apri l'archivio appropriato e da lì usa il metodo certificate () ..

  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;

Il riferimento a Capicom è disponibile all'indirizzo http://msdn.microsoft.com/en -us / library / ms995332.aspx

se stai bene spendendo denaro, ho sentito cose positive su PKIBlackbox da eldos.

Answer 2

Non è quello che stai cercando? Riferimento di crittografia

O cerchi un wrapper API?

Answer 3

Esiste una complessa libreria per ELDOS che aggiunge il supporto completo per il lavoro con i certificati X509 e altro; Leggi la descrizione completa qui:
componenti per il supporto dell'infrastruttura a chiave pubblica (PKI)

Vedi il riferimento per la classe ElX509CertificateClass qui .

Saluti.