本文整理自网络,侵删。
Uses EncdDecd;
对流的编解码:
procedure EncodeStream(Input, Output: TStream); // 编码
procedure DecodeStream(Input, Output: TStream); // 解码
// 对字符串的编解码:
function EncodeString(const Input: string): string; // 编码
function DecodeString(const Input: string): string; // 解码
相关阅读 >>
Delphi excel操作,写了个adodataset转excel的函数
更多相关阅读请进入《Delphi》频道 >>