AES算法支持Delphi2010

谢谢分享！

还是不错,谢谢分享

学习很方便，结构清晰

确定可以用，不错

确定可以用， 真是难得啊！！！

有点小问题，修改后能用

测试可用，确实是2010的

简单做了一个测试就出错了： DecryptString(EncryptString('123','abc'),'abc');

帮大忙了，网络真好

写的不错，不过源码有点小问题，只需要把46行改成function HexToStr(const Str: AnsiString): AnsiString; 就可以正常使用