标准AES加解密算法,delphi各版本均可用,如果是Delphi XE的版本调用,有中文传入字符前Utf8Encode进行转换一下