Export Certificate to DER or PEM

Demonstrates how to export a digital certificate to PEM or DER format.

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls,
    CHILKATCERTIFICATELib_TLB,
    OleCtrls;

...

procedure TForm1.Button1Click(Sender: TObject);
var
cert: TChilkatCert;
success: Integer;

begin
cert := TChilkatCert.Create(Self);

//  Th LoadByCommonName method searches the Windows
//  Current User Certificate Store and Local Machine Certificate
//  Store for a certificate whose common name (CN) matches
//  the argument:

success := cert.LoadByCommonName('Chilkat Software, Inc.');
if (success = 0) then
  begin
    ShowMessage('Failed to find certificate!');
  end
else
  begin

    //  Export certificate to a PEM file
    cert.ExportCertPemFile('cert.pem');

    //  Export certificate to a DER file
    cert.ExportCertDerFile('cert.der');

    //  Export cert to a PEM string:
    Memo1.Lines.Add(cert.ExportCertPem());

  end;

//  The Chilkat Certificate, Certificate Store, Private Key,
//  Public Key, and Key Container classes / objects are freeware.

//  They are used by and included with the Chilkat Email,
//  Crypt, S/MIME, and other commercial Chilkat components.

end;