引用System.NetEncoding单元,实现代码片断:
var base64:TBase64Encoding; GBKEncoding:TEncoding; begin base64:=TBase64Encoding.Create; GBKEncoding:=TEncoding.GetEncoding(CP_UTF8); Result:=base64.EncodeBytesToString(GBKEncoding.GetBytes(data)); GBKEncoding.Free; base64.Free; end;
- 本文固定链接: https://www.maxwoods.net/archives/1286
- 转载请注明: 第五维 于 第五维 发表