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

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

#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（“CiphersDCPblowfish.pas“）;
USEUNIT（“CiphersDCPcast128.pas“）;
USEUNIT（“CiphersDCPcast256.pas“）;
USEUNIT（“CiphersDCPdes.pas“）;
USEUNIT（“CiphersDCPgost.pas“）;
USEUNIT（“CiphersDCPice.pas“）;
USEUNIT（“CiphersDCPidea.pas“）;
USEUNIT（“CiphersDCPmars.pas“）;
USEUNIT（“CiphersDCPmisty1.pas“）;
USEUNIT（“CiphersDCPrc2.pas“）;
USEUNIT（“CiphersDCPrc4.pas“）;
USEUNIT（“CiphersDCPrc5.pas“）;
USEUNIT（“CiphersDCPrc6.pas“）;
USEUNIT（“CiphersDCPrijndael.pas“）;
USEUNIT（“CiphersDCPserpent.pas“）;
USEUNIT（“CiphersDCPtea.pas“）;
USEUNIT（“CiphersDCPtwofish.pas“）;
USEUNIT（“HashesDCPhaval.pas“）;
USEUNIT（“HashesDCPmd4.pas“）;
USEUNIT（“HashesDCPmd5.pas“）;
USEUNIT（“HashesDCPripemd128.pas“）;
USEUNIT（“HashesDCPripemd160.pas“）;
USEUNIT（“HashesDCPsha1.pas“）;
USEUNIT（“HashesDCPsha256.pas“）;
USEUNIT（“HashesDCPsha512.pas“）;
USEUNIT（“HashesDCPtiger.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.1Project1.cfg

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

     文件     400896  2006-04-26 19:49  配套光盘加密练习8.28.2.4 ool.exe

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

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

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

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

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