WebSVN – decoder – Path Comparison – / – /trunk/INCLUDES Rev 2 and /trunk/INCLUDES Rev 4

Regard whitespace Rev 2 → Rev 4

 /trunk/INCLUDES/base64.pas
 ,7 → 75,7
 {$ENDIF}
-uses SysUtils;
+uses AnsiStrings, SysUtils;
   // codiert einen String in die zugehörige Base64-Darstellung
   function Base64Encode(const InText: AnsiString): AnsiString; overload;
 ,12 → 115,12
     'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/';
   Base64Filler = '=';
-function Base64Encode(const InText: string): string; overload;
+function Base64Encode(const InText: AnsiString): AnsiString; overload;
 begin
   Base64Encode(InText, Result);
 end;
-function Base64Decode(const InText: string): string; overload;
+function Base64Decode(const InText: AnsiString): AnsiString; overload;
 begin
   Base64Decode(InText, Result);
 end;
 ,7 → 498,7
   // calculate size for destination
   OutSize := CalcEncodedSize(InSize);
   // reserve memory
-  OutText := StrAlloc(Succ(OutSize));
+  OutText := AnsiStrAlloc(Succ(OutSize));
   OutText[OutSize] := #0;
   // encode !
   Base64Encode(InText, InSize, OutText);
 ,7 → 532,7
   // calculate size for destination
   OutSize := CalcDecodedSize(InText, InSize);
   // reserve memory
-  OutText := StrAlloc(Succ(OutSize));
+  OutText := AnsiStrAlloc(Succ(OutSize));
   OutText[OutSize] := #0;
   // encode !
   {$IFDEF SpeedDecode}