anchor.diff:      MiddleY: Integer;
       NoJump: Boolean;
       sbWidth: Integer;
  -    // BG, 10.08.2011 speed up inserting images
  -    FInsertedImages: TStrings;
  -    FImagesInserted: TTimer;
  -    FImagesReformat: Boolean;
   // child components
       BorderPanel: TPanel;
       PaintPanel: TPaintPanel;
  
positive.code:         DoLogic;
          Position := OldPos;
        end;
      end;
      Invalidate;
    finally
      SetProcessing(False);
    end;
  end;
  
  
  function THtmlViewer.GetBase: ThtString;
  begin
  
negative.code:     procedure HTMLDragDrop(Sender, Source: TObject; X, Y: Integer);
      procedure HTMLDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);
      procedure HTMLTimerTimer(Sender: TObject);
      procedure Layout;
      procedure Parsed(const Title, Base, BaseTarget: ThtString);
      procedure ParseHtml;
  