Delphi ActiveX Requires Chilkat v11.7.0+

Authenticode Sign a Windows Installer Package (MSI)

See more Code Signing Examples

Demonstrates how to Authenticode sign a Windows Installer package (.msi). Signing MSI packages requires Chilkat v11.7.0 or later. The package is signed in place, and the certificate must have an RSA key: Windows does not accept the signature of an MSI that was signed with an ECDSA certificate. Delphi ActiveX

var
success: Integer;
cert: TChilkatCert;
json: TChilkatJsonObject;
msiPath: WideString;
signer: TChilkatCodeSign;
sigInfo: TChilkatJsonObject;
valid: Integer;

begin
success := 0;

//  This example requires the Chilkat API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

//  Signing a Windows Installer package (.msi) requires Chilkat v11.7.0 or later.

//  Load the code signing certificate.  It must have access to its private key.
cert := TChilkatCert.Create(Self);
success := cert.LoadPfxFile('C:/someDir/myCodeSigningCert.pfx','pfx password');
if (success = 0) then
  begin
    Memo1.Lines.Add(cert.LastErrorText);
    Exit;
  end;

//  Use a certificate with an RSA key to sign an MSI.
//  Windows does not accept the signature of an MSI that was signed with an ECDSA certificate
//  (signtool verify and the Digital Signatures tab of the file's properties report it as invalid).
//  This is a limitation of signed MSI files on Windows.  It does not apply to EXE, DLL, PowerShell,
//  or VBScript files, which can be signed with either kind of certificate.
if (cert.IsRsa() = 0) then
  begin
    Memo1.Lines.Add('Use an RSA code signing certificate to sign an MSI.');
    Exit;
  end;

//  Sign with SHA256, and ask a timestamp authority for a timestamp.  A timestamp lets the
//  signature continue to validate after the code signing certificate has expired.
//  
//  {
//    "hashAlg": "sha256",
//    "timestampToken": {
//      "enabled": true,
//      "tsaUrl": "http://timestamp.digicert.com",
//      "requestTsaCert": true,
//      "hashAlg": "sha256"
//    }
//  }
json := TChilkatJsonObject.Create(Self);
json.UpdateString('hashAlg','sha256');
json.UpdateBool('timestampToken.enabled',1);
json.UpdateString('timestampToken.tsaUrl','http://timestamp.digicert.com');
json.UpdateBool('timestampToken.requestTsaCert',1);
json.UpdateString('timestampToken.hashAlg','sha256');

msiPath := 'C:/someDir/MyAppSetup.msi';

signer := TChilkatCodeSign.Create(Self);

//  The .msi is modified in place.  The signature is stored in the package's digital signature stream.
//  If the package is already signed, the new signature replaces the existing one.
success := signer.AddSignature(msiPath,cert.ControlInterface,json.ControlInterface);
if (success = 0) then
  begin
    Memo1.Lines.Add(signer.LastErrorText);
    Exit;
  end;

Memo1.Lines.Add('Signed the MSI.');

//  Verify the signature that was just added.
sigInfo := TChilkatJsonObject.Create(Self);
valid := signer.VerifySignature(msiPath,sigInfo.ControlInterface);
if (valid = 0) then
  begin
    Memo1.Lines.Add(signer.LastErrorText);
    Exit;
  end;

Memo1.Lines.Add('The signature is valid.');