// Borland C++ Builder
// Copyright (c) 1995, 1998 by Borland International
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Encrypt.pas' rev: 3.00

#ifndef EncryptHPP
#define EncryptHPP
#include <Classes.hpp>
#include <SysUtils.hpp>
#include <SysInit.hpp>
#include <System.hpp>

//-- user supplied -----------------------------------------------------------

namespace Encrypt
{
//-- type declarations -------------------------------------------------------
enum TActionType { atEncryption, atDecryption };

class DELPHICLASS TEncrypt;
class PASCALIMPLEMENTATION TEncrypt : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	System::AnsiString FInputString;
	System::AnsiString FOutputString;
	System::AnsiString FKeyString;
	TActionType FAction;
	void __fastcall SetInputString(System::AnsiString input);
	void __fastcall SetOutputString(System::AnsiString input);
	void __fastcall SetKeyString(System::AnsiString input);
	__fastcall virtual TEncrypt(void);
	void __fastcall Execute(void);
	System::AnsiString __fastcall EncryptionEngine(System::AnsiString Src, System::AnsiString Key, bool 
		Encrypt);
	__property System::AnsiString Input = {read=FInputString, write=SetInputString};
	__property System::AnsiString Output = {read=FOutputString, write=SetOutputString};
	__property System::AnsiString Key = {read=FKeyString, write=SetKeyString};
	__property TActionType Action = {read=FAction, write=FAction, default=0};
public:
	/* TObject.Create */ __fastcall TEncrypt(void) : System::TObject() { }
	/* TObject.Destroy */ __fastcall virtual ~TEncrypt(void) { }
	
};

//-- var, const, procedure ---------------------------------------------------
extern PACKAGE char * __stdcall CryptStr(char * EInput, char * EKey);
extern PACKAGE char * __stdcall DecryptStr(char * EInput, char * EKey);

}	/* namespace Encrypt */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Encrypt;
#endif
//-- end unit ----------------------------------------------------------------
#endif	// Encrypt
