通过delphi实现对字符串进行加密和解密操作