Delphi xe System.NetEncoding 字符串base64编码解码

本文整理自网络，侵删。

 


uses System.NetEncoding;

procedure TForm1.Edit1Ch

ange(Sender: TObject);
begin
  Edit2.Text := TNetEncoding.Base64.Encode(Edit1.Text);
end;

procedure TForm1.Edit2Change(Sender: TObject);
begin
  Edit3.Text := TNetEncoding.Base64.Decode( Edit2.Text );
end;
 

相关阅读 >>

Delphi richedit选中文字右键菜单的实现

Delphi 从内存中加载并启动一个exe

Delphi xe5 重启 关闭 windows 8

Delphi控制面板应用大全

Delphi d10.x 并行库ppl编程之 futures

Delphi int64：是Delphi中最大的整数，64位有符号整数

Delphi monthcalendar1 获取选中日期

Delphi 如何取得系统中的桌面的路径

Delphi 如何判断html编码格式，解决乱码问题

Delphi判断文本文件的编码格式

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi xe System.NetEncoding 字符串base64编码解码