anchor.diff:      begin
         Inc(i); // skip the % char
         try
  -        s := Format('$%s%s', ['$', ASrc[i], ASrc[i+1]]);
  +        s := Format('$%s%s', [URLChar(ASrc[i]), URLChar(ASrc[i+1])]);
           Result[j] := URLChar(StrToInt(s));
         except end;
         Inc(i, 1);  // һַ.
  
positive.code: function TDBufferBuilder.GetInstanceSize: Integer;
  begin
    Result := FCapacity;
  end;
  
  function TDBufferBuilder.Seek(const Offset: Int64; Origin: TSeekOrigin): Int64;
  
negative.code:     function Append(v:Integer): TDBufferBuilder; overload;
      function Append(v:Double): TDBufferBuilder; overload;
      function AppendUtf8(const str: String): TDBufferBuilder;
      function AppendByte(const aByte:Byte): TDBufferBuilder;
      function AppendWord(const w:Word): TDBufferBuilder; 
      /// <summary>
      ///  Ƽø÷
      /// </summary>
  