delphi实现动态加密解密功能。