Class TfrmMD5Test (unit MD5T)

Inherits from

TForm

Constructors



Functions

procedure btnDoFileClick(Sender: TObject);

btnDoTextClick} {******************************************************************************* * Procedure : btnDoFileClick * ******************************************************************************** * Purpose : Creates the hash of the file specified by the open dialog * ******************************************************************************** * Paramters : None * ******************************************************************************** * Returns : None *

procedure btnDoTextClick(Sender: TObject);

***************************************************************************** * Procedure : btnDoTextClick * ******************************************************************************** * Purpose : Creates the hash of the text in the input box * ******************************************************************************** * Paramters : None * ******************************************************************************** * Returns : None *

Properties

Events

Variables

btnDoFile : TButton;


btnDoText : TButton;


edtHashValue : TEdit;


edtInput : TEdit;


grpHash : TGroupBox;


grpInput : TGroupBox;


lblHash : TLabel;


lblInput : TLabel;


MD51 : TMD5;


OpenDialog1 : TOpenDialog;



Constructors


Functions


procedure btnDoFileClick(Sender: TObject);

btnDoTextClick} {******************************************************************************* * Procedure : btnDoFileClick * ******************************************************************************** * Purpose : Creates the hash of the file specified by the open dialog * ******************************************************************************** * Paramters : None * ******************************************************************************** * Returns : None *


procedure btnDoTextClick(Sender: TObject);

***************************************************************************** * Procedure : btnDoTextClick * ******************************************************************************** * Purpose : Creates the hash of the text in the input box * ******************************************************************************** * Paramters : None * ******************************************************************************** * Returns : None *


Properties


Events


Variables


btnDoFile : TButton;


btnDoText : TButton;


edtHashValue : TEdit;


edtInput : TEdit;


grpHash : TGroupBox;


grpInput : TGroupBox;


lblHash : TLabel;


lblInput : TLabel;


MD51 : TMD5;


OpenDialog1 : TOpenDialog;