Кодирование Mime / Base 64

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

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

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

Этот кэшированный пост из 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; 

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

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