delphi 10.1 Berlin 中使用自带的 Base64 编码

Posted 2020-09-11 思想。生活。网络

delphi 10.1 berlin版本中，有好几个 base64 编码的单元可以使用，例如 Indy， MessageDigest_5，还有 CnBase64，我现在使用自带的 System.NetEncoding。

var
  params: string;
  Digest: TBytes;
  Base64: TBase64Encoding;
begin
  Base64 := TBase64Encoding.Create;
  params := Base64.EncodeBytesToString(Digest);//对数组进行编码
  Base64.Encode(InStream, OutStream);//对内存流进行编码
  Base64.Free;
end;

简单。