anchor.diff:        else
         begin
           // Could be escaped quote ""
  -        if ( TextPointer + 1 ) ^ = DoubleQuote then
  +//        if (TextPointer + 1 )^ = DoubleQuote then
  +        if ( TextPointer + 1 ) ^ = CharDoubleQuote then
           begin
             // yes it is
             inc( TextPointer ); // skip second one
  
positive.code:           // start of text... somethin weird
            InQuote := false;
          end
          else if ( TextPointer - 1 ) ^ = DoubleQuote then
          begin
            // yes it is
            dec( TextPointer ); // skip second one
  
negative.code:   TTextAlignment = ( taLeft,
                       taRight,
                       taCenter );
  
  const
    TagStr: array[ ttInvalid .. ttEnd ] of string =
  