Class TTomEncryption (unit Encryp)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions

Procedure Execute;


Function EncryptionEngine (Src:String; Key : String; Encrypt : Boolean):String;


procedure SetInputString(input:string);


procedure SetKeyString(input:string);


procedure SetOutputString(input:string);


Properties

property Action : TActionType


property Input : String

Published declarations

property Key : String


property Output : String


Events

Variables

FAction : TActionType;


FHexInputString : string;


FHexOutputString : string;


FInputString : string;

Private declarations

FKeyString : string;


FOutputString : string;



Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions


Procedure Execute;


Function EncryptionEngine (Src:String; Key : String; Encrypt : Boolean):String;


procedure SetInputString(input:string);


procedure SetKeyString(input:string);


procedure SetOutputString(input:string);


Properties


property Action : TActionType


property Input : String

Published declarations


property Key : String


property Output : String


Events


Variables


FAction : TActionType;


FHexInputString : string;


FHexOutputString : string;


FInputString : string;

Private declarations


FKeyString : string;


FOutputString : string;