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 Chilkat RSA ActiveX

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;