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 按esc快捷键退出程序的简单方法

Delphi 程序嵌入桌面效果的实现

Delphi 中string字符串转换byte[]字节数组

如何让dbgrid显示序号？

Delphi 批量多个字符串合并一个txt文件

Delphi 中 image 控件加载bmp、jpg、gif、png等图片的办法

Delphi控制word添加多行文字

Delphi 读取eset nod32 的用户名与密码

Delphi dbgrid查询内容的导出为txt函数

Delphi响应wmi事件（响应网线断开）

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

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