anchor.diff:    OutputString: string;
   begin
     EscapeLen := pData^;
  -  EscapeCode := (pData + 1) ^;
  +  EscapeCode := (pData + 1)^;
     OutputString := '';
   
     case EscapeCode of
  
positive.code: 
      ecHighlight2:
      begin
        StyleCode := ( pData + 2 ) ^;
        if StyleCode <= High( IPFHighlight2Tags ) then
          OutputString := IPFHighlight2Tags[ StyleCode ];
  
  
negative.code: 
      ecHighlight1:
      begin
        StyleCode := ( pData + 2 )^;
        if StyleCode <= High( IPFHighlight1Tags ) then
          OutputString := IPFHighlight1Tags[ StyleCode ];
        if StyleCode = 0 then
  