AES 是一種使用安全碼進行信息加密的標(biāo)準(zhǔn)。
它支持 128 位、192 位和 256 位的密匙。

加密算法的實現(xiàn)在 ElAES.pas 單元中。
本人將其加密方法封裝在 AES.pas 單元中，
只需要調(diào)用兩個標(biāo)準(zhǔn)函數(shù)就可以完成字符串的加密和解密。

(* 密匙長度 *)

128 位支持長度為 16 個字符
192 位支持長度為 24 個字符
256 位支持長度為 32 個字符

所有加密和解密操作在默認(rèn)情況下為 128 位密匙。

(* 文件列表 *)

..\Source\ AES 單元文件
..\Example\ 演示程序

(* 適用平臺 *)

這份 Delphi 的執(zhí)行基于 FIPS 草案標(biāo)準(zhǔn)，
并且 AES 原作者已經(jīng)通過了以下平臺的測試：

Delphi 4
Delphi 5
C++ Builder 5
Kylix 1

本人又重新進行了補充測試，并順利通過了以下平臺：

Delphi 6
Delphi 7

特別說明：

在 Delphi 3 標(biāo)準(zhǔn)版中進行測試時，因為缺少 Longword 數(shù)據(jù)類型和
Math.pas 文件，并且不支持 overload 指示字，所以不能正常編譯。

(* 演示程序 *)

這個示例程序演示了如何使用 AES 模塊進行字符串的加密和解密過程。

(* 使用方法 *)

在程序中引用 AES 單元。

調(diào)用函數(shù) EncryptString 和 DecryptString 進行字符串的加密和解密。
調(diào)用函數(shù) EncryptStream 和 DecryptStream 進行流的加密和解密。
調(diào)用過程 EncryptFile 和 DecryptFile 進行文件的加密和解密。

詳細(xì)參閱 Example 文件夾中的例子。