Using a .NET .snk Key File for RSA Encryption

Demonstrates how to load and use a .NET .snk key file for RSA encryption. SNK files are created by the Microsoft .NET Strong Name Tool (Sn.exe).

Download 32-bit Chilkat RSA ActiveX (.msi)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

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

...

procedure TForm1.Button1Click(Sender: TObject);
var
rsa: TChilkatRsa;
success: Integer;
xmlKey: String;
bUsePrivateKey: Integer;
encryptedText: String;
decryptedText: String;

begin
rsa := TChilkatRsa.Create(Self);

success := rsa.UnlockComponent('Anything for 30-day trial');
if (success <> 1) then
  begin
    ShowMessage('RSA component unlock failed');

  end;

//  Load a public/private key pair from a .snk key file.
xmlKey := rsa.SnkToXml('chilkat2.snk');

Memo1.Lines.Add(xmlKey);

//  The xmlKey contains both public and private keys.
//  Import either the public or private for encrypting or
//  decrypting.
rsa.ImportPrivateKey(xmlKey);

bUsePrivateKey := 1;
encryptedText := rsa.EncryptStringENC('Hello World!',bUsePrivateKey);

Memo1.Lines.Add(encryptedText);

//  Now decrypt with the public key:
rsa.ImportPublicKey(xmlKey);
bUsePrivateKey := 0;
decryptedText := rsa.DecryptStringENC(encryptedText,bUsePrivateKey);

Memo1.Lines.Add(decryptedText);

//  Note: We could have just as well encrypted using the public key
//  and decrypted using the private key.

end;