Delphi ActiveX

Example: Crypt2.HashStringENC method

Demonstrates how to call the HashStringENC method. 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;
s: WideString;
hashStr: WideString;

begin
crypt := TChilkatCrypt2.Create(Self);

s := 'får';

// The string "får" in utf-8 is composed of these bytes: 0x66 0xC3 0xA5 0x72
crypt.Charset := 'utf-8';

crypt.EncodingMode := 'hex_lower';
crypt.HashAlgorithm := 'sha256';

// Get the hex string for the sha-256 hash of the utf-8 byte representation of the string
hashStr := crypt.HashStringENC(s);

Memo1.Lines.Add(hashStr);

// Output:
// cb8f773dd592337ed7f928012a60f48e1efb357beeda124a54461410e216fece
end;