加密与解密实战入门配套加密解密程序

加密与解密实战入门（配套加密解密程序）

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

#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;
}
//---------------------------------------------------------------------------

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        358  2006-02-09 18:34  配套光盘\加密练习\8.1\Project1.cfg

     文件       1096  2006-02-09 18:34  配套光盘\加密练习\8.1\Project1.dof

     文件        188  2006-02-09 18:34  配套光盘\加密练习\8.1\Project1.dpr

     文件     376832  2006-04-26 19:39  配套光盘\加密练习\8.1\Project1.exe

     文件        876  2006-02-09 18:34  配套光盘\加密练习\8.1\Project1.res

     文件       9712  2006-02-09 19:01  配套光盘\加密练习\8.1\Unit1.dcu

     文件         51  2006-04-27 17:54  配套光盘\加密练习\8.1\Unit1.ddp

     文件       1801  2006-04-27 17:53  配套光盘\加密练习\8.1\Unit1.dfm

     文件       7930  2006-02-09 19:01  配套光盘\加密练习\8.1\Unit1.pas

     文件       1808  2006-02-09 19:15  配套光盘\加密练习\8.1\Unit1.~dfm

     文件       7930  2006-02-09 19:01  配套光盘\加密练习\8.1\Unit1.~pas

     目录          0  2007-01-22 14:11  配套光盘\加密练习\8.1

     文件       9246  2006-02-09 22:08  配套光盘\加密练习\8.2\8.2.4\des.dcu

     文件      12123  2006-02-09 22:04  配套光盘\加密练习\8.2\8.2.4\des.pas

     文件        358  2006-02-09 22:05  配套光盘\加密练习\8.2\8.2.4\Project1.cfg

     文件       1096  2006-02-09 22:05  配套光盘\加密练习\8.2\8.2.4\Project1.dof

     文件        209  2006-02-09 22:05  配套光盘\加密练习\8.2\8.2.4\Project1.dpr

     文件        876  2006-02-09 21:35  配套光盘\加密练习\8.2\8.2.4\Project1.res

     文件        188  2006-02-09 21:36  配套光盘\加密练习\8.2\8.2.4\Project1.~dpr

     文件        358  2006-02-09 22:25  配套光盘\加密练习\8.2\8.2.4\Project2.cfg

     文件       1096  2006-02-09 22:25  配套光盘\加密练习\8.2\8.2.4\Project2.dof

     文件        209  2006-02-09 22:25  配套光盘\加密练习\8.2\8.2.4\Project2.dpr

     文件     373248  2006-04-26 19:49  配套光盘\加密练习\8.2\8.2.4\Project2.exe

     文件        876  2006-02-09 22:15  配套光盘\加密练习\8.2\8.2.4\Project2.res

     文件        188  2006-02-09 22:17  配套光盘\加密练习\8.2\8.2.4\Project2.~dpr

     文件     400896  2006-04-26 19:49  配套光盘\加密练习\8.2\8.2.4\tool.exe

     文件       4288  2006-02-09 22:13  配套光盘\加密练习\8.2\8.2.4\Unit1.dcu

     文件         51  2006-04-27 17:56  配套光盘\加密练习\8.2\8.2.4\Unit1.ddp

     文件       1639  2006-04-27 17:56  配套光盘\加密练习\8.2\8.2.4\Unit1.dfm

     文件        832  2006-02-09 22:13  配套光盘\加密练习\8.2\8.2.4\Unit1.pas

............此处省略946个文件信息