No commit message

mmatsinger · Jan 22, 2018 · 3ed6ec9 · 3ed6ec9
1 parent 432620c
commit 3ed6ec9
Showing 1 changed file with 2 additions and 6 deletions.
diff --git a/source/ALString.pas b/source/ALString.pas
@@ -7163,18 +7163,14 @@ function ALBase64DecodeStringU(const S: String; const AEncoding: TEncoding = nil
 
 {**********************************************************}
 function ALBase64EncodeBytesU(const Bytes: Tbytes): String;
-var StrBuf: String;
 begin
-  StrBuf := StringOf(Bytes);
-  result := String(ALBase64EncodeString(AnsiString(StrBuf)));
+  result := String(ALBase64EncodeString(AnsiString(StringOf(Bytes))));
 end;
 
 {******************************************************}
 function ALBase64DecodeBytesU(const S: String): Tbytes;
-var StrBuf: String;
 begin
-  StrBuf := String(ALBase64DecodeString(AnsiString(S)));
-  result := BytesOf(StrBuf);
+  result := BytesOf(String(ALBase64DecodeString(AnsiString(S))));
 end;
 
 {$IFEND}