//应用delphi自带的EncdDecd单元
procedure TForm1.btn3Click(Sender: TObject);var s: string;begin s := ‘abcdefg‘; s := AnsiToUtf8(s); s := EncodeString(s); //DecodeString showmessage(s);end;
Delphi 对应JAVA的BASE64位加密处理
原文：https://www.cnblogs.com/studycode/p/11518477.html
