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程序设计（一）

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有