دلفي 7 الوصول مخزن الشهادات ويندوز X509

Question

وسؤالي هو بسيط جدا: هل هناك طريقة بسيطة للوصول إلى Windows مخزن الشهادات X509 باستخدام دلفي 7

وقبل أن تسأل هذا السؤال لقد غوغليد، ولكن لم يتم العثور على أي معلومات مفيدة.

Answer 1

وأسهل طريقة هي استخدام CAPICOM، لتصل إلى الفوز التعريب المعهد مباشرة مؤلمة.

وبمجرد تسجيل الكائن كوم وخلق وحدة typelib الخاص منه ..

وفتح متجر المناسب، وهناك من استخدام شهادات () طريقة ..

  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

وإذا كنت موافق مع إنفاق المال، لقد سمعت أشياء جيدة عن PKIBlackbox من eldos.

Answer 2

وأليس هذا ما كنت تبحث عنه؟ تشفير المرجعي

وأو هل بحث أحد التفاف API؟

Answer 3

وهناك مكتبة معقدة حرية التنقل ELDOS التي تضيف الدعم الكامل للعمل مع شهادات X509 وأكثر من ذلك؛ قراءة وصف كامل هنا:
مكونات البنية التحتية للمفتاح العام (PKI) دعم

وانظر المرجع للطبقة ElX509CertificateClass هنا .

والتحيات.