Class TfrmPasswordTest (unit Passtst)

Inherits from

TForm

Renamed from PassTest.pas 6/15/1998 Paul Rice to avoid conflict with author's work.

Constructors



Functions

procedure btnCheckPasswordClick(Sender: TObject);

btnSetPasswordClick

procedure btnSetPasswordClick(Sender: TObject);


Properties

Events

Variables

Bevel1 : TBevel;


Bevel2 : TBevel;


Bevel3 : TBevel;


Bevel4 : TBevel;


btnCheckPassword : TButton;


btnSetPassword : TButton;


edtCheckPassword : TEdit;


edtStorePassword : TEdit;


Label1 : TLabel;


lblPassword : TLabel;


lblPasswordHashCheck : TLabel;


lblPasswordHashStore : TLabel;


mmoCheckExplanation : TMemo;


mmoSetExplanation : TMemo;


SHA1 : TSHA;



Constructors


Functions


procedure btnCheckPasswordClick(Sender: TObject);

btnSetPasswordClick


procedure btnSetPasswordClick(Sender: TObject);


Properties


Events


Variables


Bevel1 : TBevel;


Bevel2 : TBevel;


Bevel3 : TBevel;


Bevel4 : TBevel;


btnCheckPassword : TButton;


btnSetPassword : TButton;


edtCheckPassword : TEdit;


edtStorePassword : TEdit;


Label1 : TLabel;


lblPassword : TLabel;


lblPasswordHashCheck : TLabel;


lblPasswordHashStore : TLabel;


mmoCheckExplanation : TMemo;


mmoSetExplanation : TMemo;


SHA1 : TSHA;