Кодировка Mime / Base 64

Question

Мне нужен способ для кодирования строки в Mime / Base64 в Delphi 7 и PHP

Эти два кодера должны быть совместимы :)

Answer 1

Indy-Project предоставляет классы кодировщиков / декодеров base64. Вы можете найти документацию здесь .

Для PHP вы можете использовать внутренние функции PHP base64_encode и base64_decode.

Answer 2

Единица EncdDecd была включена начиная с Delphi 6;ниже приведены функции base64, совместимые с Mime.

Этот кэшированный пост из FlexVN ( оригинальный пост не всегда онлайн) объясняет, как сделать base64что-то между PHP и Delphi с помощью модуля EncdDecd.

unit EncdDecd;

interface

uses Classes, SysUtils;

procedure EncodeStream(Input, Output: TStream);
procedure DecodeStream(Input, Output: TStream);
function  EncodeString(const Input: string): string;
function  DecodeString(const Input: string): string;

function  DecodeBase64(const Input: AnsiString): TBytes;
function  EncodeBase64(const Input: Pointer; Size: Integer): AnsiString;