在FMX中,我可以使用System.NetEncoding单元在 Delphi 中对Base64字符串进行编码和解码,但这个单元似乎在TMS Web Core中不可用:[错误] uMain_web.pas(29):找不到单元“System.NetEncoding”System.NetEncoding或Base64解码/编码的TMS Web Core替代方案是什么?
System.NetEncoding
7rfyedvj1#
不幸的是,System.NetEncoding不适用于TMS Web Core。在TMS Web Core中,您可以使用window.btoa()和window.atob()。btoa编码和atob解码。
window.btoa()
window.atob()
btoa
atob
var EncodedString: String; DecodedString: String; begin EncodedString := window.btoa('Shaun Roselt'); // Encode String to Base64 DecodedString := window.atob('U2hhdW4gUm9zZWx0'); // Decode Base64 String end;
doinxwow2#
我们可以在TMS Web Core v2.3.0.0中使用System.NetEncoding:
uses System.NetEncoding; procedure TForm1.WebButton1Click(Sender: TObject); var Encoded, Decoded: String; Coder: TBase64Encoding; begin Coder := TBase64Encoding.Create; Encoded := Base64Encoding.Encode('Shaun Roselt'); Decoded := Base64Encoding.Decode(Encoded); Coder.Free; end;
2条答案
按热度按时间7rfyedvj1#
不幸的是,
System.NetEncoding
不适用于TMS Web Core。在TMS Web Core中,您可以使用
window.btoa()
和window.atob()
。btoa
编码和atob
解码。doinxwow2#
我们可以在TMS Web Core v2.3.0.0中使用
System.NetEncoding
: