Delphi ActiveX

Transition from RandomizeKey to GenRandomBytesENC

Provides instructions for replacing deprecated RandomizeKey method calls with GenRandomBytesENC. Delphi ActiveX

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Chilkat_TLB;

...

procedure TForm1.Button1Click(Sender: TObject);
var
crypt: TChilkatCrypt2;
randomKeyBase64: WideString;

begin
crypt := TChilkatCrypt2.Create(Self);

crypt.CryptAlgorithm := 'aes';
crypt.CipherMode := 'cbc';
crypt.KeyLength := 256;
// ...

// ------------------------------------------------------------------------
// The RandomizeKey method is deprecated:

// Generates and sets a random 32-byte (256-bit) secret key.
crypt.RandomizeKey();

// ------------------------------------------------------------------------
// Do the equivalent using GenRandomBytesENC followed by SetEncodedKey

crypt.EncodingMode := 'base64';
randomKeyBase64 := crypt.GenRandomBytesENC(32);
crypt.SetEncodedKey(randomKeyBase64,'base64');
end;