DELPHI ФАЙЛ В BASE64

Base64 — это стандарт кодирования двоичных данных в текстовый формат, в котором используются только символы ASCII. Delphi предоставляет встроенные методы для работы с кодировкой Base64. Самый распространенный пример использования заключается в преобразовании файлов в Base64, что позволяет их передавать в виде текстовой строки, например, в JSON или XML.

Пример кода для преобразования файла в Base64:

var FileStream: TFileStream; Base64Stream: TStringStream; Base64String: string;begin FileStream := TFileStream.Create('filename.txt', fmOpenRead); Base64Stream := TStringStream.Create(''); try Soap.EncdDecd.EncodeStream(FileStream, Base64Stream); Base64String := Base64Stream.DataString; finally FreeAndNil(FileStream); FreeAndNil(Base64Stream); end;

Для преобразования Base64-строки обратно в файл можно использовать следующий код:

var FileStream: TFileStream; Base64Stream: TStringStream; Base64String: string;begin Base64Stream := TStringStream.Create(Base64String); FileStream := TFileStream.Create('filename.txt', fmCreate); try Soap.EncdDecd.DecodeStream(Base64Stream, FileStream); finally FreeAndNil(Base64Stream); FreeAndNil(FileStream); end;

Обратите внимание, что в приведенном выше коде используется класс Soap.EncdDecd, который находится в модуле Soap.EncdDecd.pas, поэтому для его использования необходимо подключить этот модуль к вашему проекту.

C++ : C++ bitmap to base64

PYTHON : Encoding an image file with base64

Android : Base64 encoder and decoder

Decoding base64 in batch

JavaScript the Delphi Way - Jon Aasenden - Delphicon 2023

C++ : Loading Base64 encoded Image in Cocos2d-x

C# : Converting image to base64

How it works with Holger: Use base64 decoding in Delphi apps [Intermediate]

How to convert an image to base64 encoding - Delphi 10

JavaScript : Convert blob to base64