anchor.diff:  end;
   
   destructor THtmlViewer.Destroy;
  +var
  +  I: Integer;
   begin
   {$ifndef NoMetaFile}
     AbortPrint;
   {$endif}
  +  FImagesInserted.Free;
  +  for I := 0 to FInsertedImages.Count - 1 do
  +    FInsertedImages.Objects[I].Free;
  +  FInsertedImages.Free;
  +  HTMLTimer.Free;
     Exclude(FViewerState, vsMiddleScrollOn);
     if vsLocalBitmapList in FViewerState then
     begin
  
positive.code:   HTMLTimer.OnTimer := HTMLTimerTimer;
    FLinkAttributes := ThtStringList.Create;
  
  {$ifdef LCL}
    // BG, 24.10.2010: there is no initial WMSize message, thus size child components now:
    DoScrollBars;
  
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 ImagesInsertedTimer(Sender: TObject);
      procedure Layout;
      procedure Parsed(const Title, Base, BaseTarget: ThtString);
      procedure ParseHtml;
  