anchor.diff:  
       I := 0;
       Len := System.length(Delimiter);
  +{$IFDEF DELPHIXE3_UP}
  +    PosStart := System.Low(S);
  +    HighPoint := System.High(S);
  +{$ELSE}
       PosStart := 1;
  +    HighPoint := System.length(S);
  +{$ENDIF DELPHIXE3_UP}
       PosDel := System.Pos(Delimiter, S);
       while PosDel > 0 do
       begin
  
positive.code: class function TConverters.ConvertStringToBytes(const a_in: String;
    a_encoding: TEncoding): THashLibByteArray;
  begin
    result := a_encoding.GetBytes(a_in);
  end;
  
  class function TConverters.SplitString(const S: String; Delimiter: Char)
    : THashLibStringArray;
  var
    PosStart, PosDel, SplitPoints, I, Len: Int32;
  begin
    result := Nil;
    if S <> '' then
    begin
      { Determine the length of the resulting array }
      SplitPoints := 0;
      for I := 1 to System.length(S) do
      begin
        if (Delimiter = S[I]) then
          System.Inc(SplitPoints);
  
negative.code:   HlpBits,
    HlpBitConverter;
  
  resourcestring
    SEncodingInstanceNil = 'Encoding Instance Cannot Be Nil';
  
  type
    TConverters = class sealed(TObject)
  
  