AES 加密算法函数包及演示文件 v1.3

分　　类：安全
语　　种：简体中文
编辑器：D4/6/7/CB5/Ky1
平　　台：Win9x,Win2k/XP/NT,Win2003,Linux
作品源代码： 本地下载
软件或演示： -
代码大小： 227.0K
软件大小： -

(**********)
(* *)
(* Advanced Encryption Standard (AES) *)
(* Interface Unit v1.3 *)
(* *)
(* History.txt 版本历史 2004.12.04 *)
(* *)
(**********)

{ -- v1.3 - 2004.12.04 -- }

重新修改加密模式，支持 128、192 和 256 位密匙加密。
改动函数参数表，添加 KeyBit 参数。
但是可以不带此参数，默认情况按照 128 位操作。

添加了新例程，支持对流和文件的操作。

包含 4 个函数：
function EncryptString(Value: string; Key: string;
KeyBit: TKeyBit = kb128): string;
function DecryptString(Value: string; Key: string;
KeyBit: TKeyBit = kb128): string;
function EncryptStream(Stream: TStream; Key: string;
KeyBit: TKeyBit = kb128): TStream;
function DecryptStream(Stream: TStream; Key: string;
KeyBit: TKeyBit = kb128): TStream;

包含 2 个过程：
procedure EncryptFile(SourceFile, DestFile: string;
Key: string; KeyBit: TKeyBit = kb128);
procedure DecryptFile(SourceFile, DestFile: string;
Key: string; KeyBit: TKeyBit = kb128);

{ -- v1.0 - 2004.12.03 -- }

包含 2 个函数：
function EncryptString(Value: string; Key: string): string;
function DecryptString(Value: string; Key: string): string;

支持 128 位密匙加密和解密字符串。

上一篇： AES 加密算法函数包及演示文件
下一篇： Delphi2005下的BS程序设计（一）

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!