Delphi 自带的 Base64 编解码函数 + 例程

comeheres · 发表于 2013-7-24 00:02:32

马上注册，结交更多好友，享用更多功能^_^

您需要登录才可以下载或查看，没有账号？立即注册

x

本帖最后由 comeheres 于 2013-7-24 00:05 编辑

Delphi 自带了 Base64 编解码的单元，叫 EncdDecd。

这个单元提供两套四个公开函数：

对流的编解码：
procedure EncodeStream(Input, Output: TStream); // 编码
procedure DecodeStream(Input, Output: TStream); // 解码

对字符串的编解码：
function EncodeString(const Input: string): string; // 编码
function DecodeString(const Input: string): string; // 解码

使用时 uses EncdDecd

下面是我写的一个小小例程：

登录/注册后可看大图

收点辛苦小费

base64.zip (466.09 KB, 下载次数: 5, 售价: 2 鱼币)

Angel丶L · 发表于 2015-2-2 00:55:51

逛一逛，瞧一瞧，顶一顶，没坏处

账号		自动登录	找回密码
密码			立即注册

[技术交流] Delphi 自带的 Base64 编解码函数 + 例程

马上注册，结交更多好友，享用更多功能^_^