Delphi DLL Requires Chilkat v11.0.0+

Workaround for the deprecated Crypt2.OpaqueSignBytes method

Shows how to replace the deprecated OpaqueSignBytes method. (Chilkat is moving away from the use of CkByteData.) Delphi DLL

var
success: Boolean;
crypt: HCkCrypt2;
cert: HCkCert;
path: PWideChar;
inData: HCkByteData;
outData: HCkByteData;
bd: HCkBinData;

begin
success := False;

crypt := CkCrypt2_Create();

cert := CkCert_Create();
//  ...
//  Load the cert from a source such as a .pfx/.p12 file, smart card, USB token, Apple keychain, Windows certificate store, etc.
//  
success := CkCrypt2_SetSigningCert(crypt,cert);

//  ...
//  ...
//  ...

path := 'c:/someDir/example.dat';

//  ------------------------------------------------------------------------
//  The OpaqueSignBytes method is deprecated:

inData := CkByteData_Create();
CkByteData_loadFile(inData,path);

outData := CkByteData_Create();

success := CkCrypt2_OpaqueSignBytes(crypt,inData,outData);

//  ------------------------------------------------------------------------
//  Workaround.
//  (Chilkat is moving away from using CkByteData)

bd := CkBinData_Create();
CkBinData_LoadFile(bd,path);

//  If successful, the contents of bd are replaced with the PKCS#7 signed-data.
success := CkCrypt2_OpaqueSignBd(crypt,bd);

CkCrypt2_Dispose(crypt);
CkCert_Dispose(cert);
CkByteData_Dispose(inData);
CkByteData_Dispose(outData);
CkBinData_Dispose(bd);