Dcpcrypt2delphi加解密控件，包含很多加密算法

Dcpcrypt2支持从D4-D2009 我是用XE5装2009版本的

//---------------------------------------------------------------------------

#include 
#pragma hdrstop
USERES（“DCPcppbuilder5.res“）;
USEPACKAGE（“vcl50.bpi“）;
USEUNIT（“DCPbase64.pas“）;
USEUNIT（“DCPblockciphers.pas“）;
USEUNIT（“DCPconst.pas“）;
USEUNIT（“DCPcrypt2.pas“）;
USEUNIT（“DCPreg.pas“）;
USEUNIT（“Ciphers\DCPblowfish.pas“）;
USEUNIT（“Ciphers\DCPcast128.pas“）;
USEUNIT（“Ciphers\DCPcast256.pas“）;
USEUNIT（“Ciphers\DCPdes.pas“）;
USEUNIT（“Ciphers\DCPgost.pas“）;
USEUNIT（“Ciphers\DCPice.pas“）;
USEUNIT（“Ciphers\DCPidea.pas“）;
USEUNIT（“Ciphers\DCPmars.pas“）;
USEUNIT（“Ciphers\DCPmisty1.pas“）;
USEUNIT（“Ciphers\DCPrc2.pas“）;
USEUNIT（“Ciphers\DCPrc4.pas“）;
USEUNIT（“Ciphers\DCPrc5.pas“）;
USEUNIT（“Ciphers\DCPrc6.pas“）;
USEUNIT（“Ciphers\DCPrijndael.pas“）;
USEUNIT（“Ciphers\DCPserpent.pas“）;
USEUNIT（“Ciphers\DCPtea.pas“）;
USEUNIT（“Ciphers\DCPtwofish.pas“）;
USEUNIT（“Hashes\DCPhaval.pas“）;
USEUNIT（“Hashes\DCPmd4.pas“）;
USEUNIT（“Hashes\DCPmd5.pas“）;
USEUNIT（“Hashes\DCPripemd128.pas“）;
USEUNIT（“Hashes\DCPripemd160.pas“）;
USEUNIT（“Hashes\DCPsha1.pas“）;
USEUNIT（“Hashes\DCPsha256.pas“）;
USEUNIT（“Hashes\DCPsha512.pas“）;
USEUNIT（“Hashes\DCPtiger.pas“）;
//---------------------------------------------------------------------------
#pragma package（smart_init）
//---------------------------------------------------------------------------

//   Package source.
//---------------------------------------------------------------------------

#pragma argsused
int WINAPI DllEntryPoint（HINSTANCE hinst unsigned long reason void*）
{
        return 1;
}
//---------------------------------------------------------------------------

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2004-12-21 20:41  Ciphers\
     文件       12027  2002-07-08 00:44  Ciphers\DCPblowfish.pas
     文件        6757  2002-07-08 00:48  Ciphers\DCPrc5.pas
     文件       13489  2002-07-08 15:13  Ciphers\DCPcast256.pas
     文件       12963  2002-07-08 14:23  Ciphers\DCPrijndael.pas
     文件       66141  1999-10-30 19:49  Ciphers\DCPrijndael.inc
     文件        8976  2002-07-08 00:48  Ciphers\DCPidea.pas
     文件       13034  1999-01-05 12:57  Ciphers\DCPblowfish.inc
     文件        7997  2002-07-08 14:19  Ciphers\DCPrc6.pas
     文件        6973  2002-07-08 15:02  Ciphers\DCPrc4.pas
     文件        2933  1998-10-20 16:24  Ciphers\DCPtwofish.inc
     文件       12879  2002-07-08 00:47  Ciphers\DCPice.pas
     文件       27896  2002-07-08 14:14  Ciphers\DCPmars.pas
     文件       19910  2002-07-08 15:13  Ciphers\DCPtwofish.pas
     文件        3997  1999-01-08 12:56  Ciphers\DCPmisty1.inc
     文件       17105  2002-07-08 15:13  Ciphers\DCPdes.pas
     文件        6489  1998-10-07 14:28  Ciphers\DCPmars.inc
     文件       21787  2002-07-13 18:48  Ciphers\DCPserpent.pas
     文件        6837  2002-07-08 00:48  Ciphers\DCPrc2.pas
     文件       13143  1999-10-25 13:26  Ciphers\DCPdes.inc
     文件       25499  1998-12-03 23:19  Ciphers\DCPcast128.inc
     文件        8241  2002-07-08 00:48  Ciphers\DCPmisty1.pas
     文件       11063  1999-02-23 12:43  Ciphers\DCPgost.inc
     文件       12333  1999-02-22 22:44  Ciphers\DCPcast256.inc
     文件        1162  1998-09-16 13:25  Ciphers\DCPrc2.inc
     文件       17674  2002-07-08 00:46  Ciphers\DCPcast128.pas
     文件        5459  2002-07-08 00:49  Ciphers\DCPtea.pas
     文件       12394  2002-07-08 14:34  Ciphers\DCPgost.pas
     文件        6615  2010-02-07 19:03  DCPbase64.pas
     文件       22098  2002-07-12 19:20  DCPblockciphers.pas
     文件        8892  2002-07-07 13:01  DCPciphers.dcr
............此处省略55个文件信息