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 获取所有应用程序窗口标题 类似任务管理器

Delphi检测当前鼠标点击处是否在指定控件内部

Delphi 将鼠标锁定在一定范围

Delphi 切换大小写的例子

Delphi unigui 控件动画

Delphi检查是否在64位windows环境中运行?

Delphi7 中tstringlist的delimiter delimitedtext有bug,字符串分割有问题

Delphi 写3389自动登录器

Delphi 将strings合并成一个逗号分隔的字符串,用于sql

Delphi arp攻击代码

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...