|
| 盒子资源分类 |
![]() |
|
|
|
|
| AES 加密算法函数包及演示文件 |
![]() |
| 关键字：AES Advanced Encryption 加密 函数 演示 |
| 来 自：原创 |
| 平 台：Win9x,Win2k/XP/NT,Win2003,Linux |
下载所需：0 火柴 |
| 深浅度：高级 |
完成时间：2004/12/3 |
| 发布者：corbie8205 |
发布时间：2004/12/4 |
| 编辑器：D4/6/7/CB5/Ky1 |
语 种：简体中文 |
| 分 类：安全 |
下载浏览：1984/19824 |
|
|
|
|
|
// Advanced Encryption Standard (AES)
// Interface Unit v1.0
//
// Readme.txt 自述文档 2004.12.03
(* 介绍 *)
AES 是一种使用安全码进行信息加密的标准。
它支持 128 位、192 位和 256 位长度的密匙。
加密算法的实现在 ElAES.pas 单元中。
本人将其加密方法封装在 AES.pas 单元中，
只需要调用两个标准函数就可以完成字符串的加密和解密。
(* 文件列表 *)
..\Source\ AES 单元文件
..\Example\ 演示程序
(* 适用平台 *)
这份 Delphi 的执行基于 FIPS 草案标准，
并且 AES 原作者已经通过了以下平台的测试：
Delphi 4
Delphi 5
C++ Builder 5
Kylix 1
本人又重新进行了补充测试，并顺利通过了以下平台：
Delphi 6
Delphi 7
特别说明：
在 Delphi 3 标准版中进行测试时，因为缺少 Longword 数据类型和
Math.pas 文件，并且不支持 overload 指示字，所以不能正常编译。
(* 演示程序 *)
这个示例程序演示了如何使用 AES 模块进行字符串的加密和解密过程。
(* 使用方法 *)
在程序中引用 AES 单元。
调用 EncryptString 和 DecryptString 进行字符串的加密和解密。
详细参阅 Example 文件夹中的例子。
(* 许可协议 *)
您可以随意拷贝、使用和发部这个程序，但是必须保证程序的完整性，
包括作者信息、版权信息和说明文档。请勿修改作者和版权信息。
这个程序基于 Mozilla Public License Version 1.1 许可，
如果您使用了这个程序，那么就意味着您同意了许可协议中的所有内容。
您可以在以下站点获取一个许可协议的副本。
http://www.mozilla.org/MPL/
许可协议的发布基于 "AS IS" 基础,详细请阅读该许可协议。
Alexander Ionov 是 AES 算法的最初作者，保留所有权利。
(* 作者信息 *)
ElAES 作者：EldoS, Alexander Ionov
AES Interface Unit 作者：杨泽晖 (Jorlen Young)
您可以通过以下方式与我取得联系。
WebSite:
http://jorlen.51.net/
http://mycampus.03.com.cn/
http://mycampus.1155.net/
http://mycampus.ecoo.net/
http://mycampus.5500.org/
Email: stanley_xfx@163.com |
![]() |
| 本站原创作品，未经作者许可，严禁任何方式转载；转载作品，如果侵犯了您的权益，请联系我们！ |
| 相关文章 |
|
![]() |
|
|
| 相关评论 |
![]() |
|
共有评论4条
当前显示最后4条评论
|
| lijinjie |
2004/12/5 2:18:59 |
| 谢谢楼主....正好在写网络充值系统...要用到数据加密模块...本想自己写一个DES的...哈哈...现在不用...省事. |
| jiaozuo |
2004/12/15 8:48:51 |
| 谢~~研究一下~~ |
| redhf |
2004/12/30 13:00:23 |
| 多向楼主学习！ |
| lijinjie |
2005/1/15 7:39:52 |
| 有点BUG.....会产生多余的 #0 直接会引影到.解密后的..字符串的校对...自己改了下...把多余的#0截去...希望能有更好的作品..这个东东偶喜欢. |
| 我要发表评论 |
查看全部评论 |
|
|
|
