Einzelnen Beitrag anzeigen

TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.060 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: Base64 to RawByteString

  Alt 14. Jul 2020, 13:20
Und was machst du mit richtigen binären Daten, die als Base64 string reinkommen?
Bspw. eine Firmware, ein Bitmap/QR-Code und sonst was alles?

Wenn du dir sicher bist, dass deine Base64-Daten eh alle eine textuelle Information enthalten, dann kannst du das auch abkürzen:
Delphi-Quellcode:
class procedure TSuper_Api.DoDecode(
  const sBase64Daten : String;
  out rawData: RawByteString
);
var
  DecodedBytes: TBytes;
begin
  DecodedBytes := TNetEncoding.Base64.DecodeStringToBytes(sBase64Daten);
  if ImVerySureItIsJustStringData then
  begin
    rawData := RawByteString(TEncoding.UTF8.GetString(DecodedBytes));
  end;
end;
  Mit Zitat antworten Zitat