Delphi XE2+标准AES加解密算法（AES/EBC,CBC/PKCS5Padding-base64）

【实例简介】
实现了AES/ECB/PKCS5Padding、AES/CBC/PKCS5Padding 密钥长度128/192/256bit，密钥0填充。是标准的AES算法，支持在线AES加解密网站互解。 本源码从CSDN一位前辈的源码基础上做了更改，增加支持加密返回BASE64，更加完善。在此感谢原作者： http://download.csdn.net/download/qiaohaidong/9477264 需要注意的是仅在XE及以上版本支持Base64返回结果，Delphi7的base64不能直接支持。
【实例截图】
【核心代码】
c8b197c2-2266-47a7-a205-6f8d454b075c
└── AES
├── Delphi
│   ├── AesTest.dpr
│   ├── AesTest.dproj
│   ├── AesTest.dproj.local
│   ├── AesTest.identcache
│   ├── AesTest.res
│   ├── AesTest.stat
│   ├── bin
│   │   └── AesTest.exe
│   ├── ElAES.pas
│   ├── __history
│   │   ├── JDAESExtend.pas.~1~
│   │   ├── JDAESExtend.pas.~2~
│   │   ├── JDAESExtend.pas.~3~
│   │   ├── JDAESExtend.pas.~4~
│   │   ├── JDAESExtend.pas.~5~
│   │   ├── JDAESExtend.pas.~6~
│   │   ├── JDAESExtend.pas.~7~
│   │   ├── untTest.dfm.~1~
│   │   ├── untTest.dfm.~2~
│   │   ├── untTest.pas.~1~
│   │   ├── untTest.pas.~2~
│   │   ├── untTest.pas.~3~
│   │   ├── untTest.pas.~4~
│   │   └── untTest.pas.~5~
│   ├── JDAESExtend.pas
│   ├── untAES.pas
│   ├── untTest.dfm
│   ├── untTest.pas
│   └── Win32
│   └── Debug
│   ├── AesTest.exe
│   ├── ElAES.dcu
│   ├── JDAESExtend.dcu
│   ├── untAES.dcu
│   └── untTest.dcu
├── JAVA
│   └── AESTest.java
└── Readme.txt

7 directories, 33 files