DELPHI BASE64 DECODE КИРИЛЛИЦА

Base64-кодирование и декодирование - распространенные процессы в программировании. Использование кириллицы при работе с Base64 может привести к ошибкам. В Delphi проблемы с кодированием и декодированием текста на кириллице могут быть решены с помощью конвертирования строк в Unicode.

Например, для декодирования Base64-строки, содержащей кириллицу в Delphi, необходимо выполнить следующий код:

function DecodeBase64(const AValue: String): AnsiString;
var
vBytes: TBytes;
vStream: TMemoryStream;
vDecoder: TBase64Encoding;
begin
vBytes := TNetEncoding.Base64.DecodeStringToBytes(AValue);
vStream := TMemoryStream.Create;
try
vStream.Write(vBytes[0], Length(vBytes));
vStream.Position := 0;
vDecoder := TBase64Encoding.Create;
try
Result := vDecoder.Decode(vStream, vStream.Size);
finally
vDecoder.Free;
end;
finally
vStream.Free;
end;
end;


Этот код позволяет декодировать Base64-строку на кириллице в Delphi.

Android : Base 64 encode and decode example code

C++ : Decode Base64 String Using Boost

Decoding base64 in batch

HTML : How to decode base64 string as HTML content in XSLT?

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

META’S New Insane AI SAM SHOCKS The Entire Industry! (FINALLY ANNOUNCED!)