delphi Base64 編解碼
Delphi 自帶了 Base64 編解碼的單元，叫 EncdDecd，這名字很拗口而且不直觀，估計這是一直很少人關注和知道的原因。
這個單元提供兩套四個公開函式：
對流的編解碼：
procedure EncodeStream(Input, Output: TStream); inline; // deprecated 'Use TNetEncoding.Base64.Encode'; // 編碼 procedure DecodeStream(Input, Output: TStream); inline; // deprecated 'Use TNetEncoding.Base64.Decode'; // 解碼
// 對字串的編解碼： function EncodeString(const Input: string): string; inline; // deprecated 'Use TNetEncoding.Base64.Encode'; function DecodeString(const Input: string): string; inline; // deprecated 'Use TNetEncoding.Base64.Decode';
{$IFDEF NEXTGEN} function DecodeBase64(const Input: string): TBytes; inline; // deprecated 'Use TNetEncoding.Base64.DecodeStringToBytes'; function EncodeBase64(const Input: Pointer; Size: Integer): string; inline; // deprecated 'Use TNetEncoding.Base64.EncodeBytesToString'; {$ELSE !NEXTGEN} function DecodeBase64(const Input: AnsiString): TBytes; inline; // deprecated 'Use TNetEncoding.Base64.DecodeStringToBytes'; function EncodeBase64(const Input: Pointer; Size: Integer): AnsiString; inline; // deprecated 'Use TNetEncoding.Base64.EncodeBytesToString'; {$ENDIF NEXTGEN}