Работа с Base64 в Delphi

В модуле System.NetEncoding находится класс TNetEncoding, у которого есть class property Base64.

Получаем нужный енкодер и пользуемся в своё удовольствие его методами Encode или Decode. Для каждого существуют перегруженные версии для преобразования потоков, строк, массивов и их сочетаний.

uses
 System.NetEncoding;
...
var
  s: String;
begin
  s := TNetEncoding.Base64.Encode('asjjdhgfaoösjkdhföaksjdfhöasjdfhasdkjasdhfköajsjhdfajssssd');
end;