Cita:
Empezado por dimony
¿Hay alguna alternativa a CAPICOM?. He visto en la web de Microsoft que a partir de Windows7 fue excluido de WINDOWS SDK.
|
No trabajo con Delphi ni sé cual es el motivo de usar CAPICOM, pero aquí tienes algo de código en c++ con llamadas a WinInet que se adecúa más o menos al código que muestras:
HCERTSTORE hStore;
PCCERT_CONTEXT pFindContext;
hStore = CertOpenSystemStoreA(0, TEXT("MY"));
cCert = "NOMBRE DEL CERTIFICADO"
pFindContext =CertFindCertificateInStore(hStore, PKCS_7_ASN_ENCODING | X509_ASN_ENCODING, 0, CERT_FIND_SUBJECT_STR, cCert, NULL);
Ya apartir de ahí:
InternetSetOption(Data,INTERNET_OPTION_CLIENT_CERT_CONTEXT,pFindContext,Sizeof(CERT_CONTEXT));
Seleccionar el certificado con el diálogo de Windows se puede hacer con CryptUIDlgSelectCertificateFromStore.
Si te sirve o como se puede trasladar esto a Delphi no lo sé, pero si quieres hacer pruebas, pues ahí tienes algo.
Un saludo.