Delphi ActiveX

BCrypt Hash a Password

See more Encryption Examples

Example to BCrypt hash a password.

Note: This example requires Chilkat v9.5.0.65 or greater.

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;
bcryptHash: WideString;

begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

crypt := TChilkatCrypt2.Create(Self);

// The BCrypt cost factor (work factor) can be set to a value from 4 to 31.
// The default value is 10.  We'll set it here explicitly to the default value
// to make this new property known.  This line of code can be omitted
// if the default value of 10 is desired.
crypt.BCryptWorkFactor := 10;

bcryptHash := crypt.BCryptHash('mySecretPassword');
Memo1.Lines.Add('BCrypt hash = ' + bcryptHash);

// Sample output:
// BCrypt hash = $2a$10$H5kIVktMGzAPKGKNAe9DVu0iwEqfhv/o4MMJ/Dzw/MPy1leOE9NOK

// Note: Your output will be different because the BCryptHash method
// automatically generates a random salt. 
end;