anchor.diff:      end;
   
       {$IFDEF MSWINDOWS}
  -      {$IFDEF UNICODE}
  +      {$IFDEF USE_AnsiStrings}
         Result := System.AnsiStrings.StrPas(PAnsiChar(lvBuilder.Memory));
         {$ELSE}
         Result := StrPas(PAnsiChar(lvBuilder.Memory));
  
positive.code:     end;
  
      {$IFDEF MSWINDOWS}
      {$IFDEF UNICODE}
      Result := System.AnsiStrings.StrPas(PAnsiChar(lvBuilder.Memory));
      {$ELSE}
      Result := StrPas(PAnsiChar(lvBuilder.Memory));
  
negative.code: unit utils_base64;
  
  interface
  
  {$IF (RTLVersion>=23)}
  {$DEFINE USE_AnsiStrings}
  {$IFEND >=XE2}
  
  uses
    utils_strings, SysUtils, Classes
  {$IFDEF USE_AnsiStrings}
    , System.AnsiStrings
  {$ENDIF}
  
  {$IFDEF MSWINDOWS}
      , windows
  {$ELSE}
  