anchor.diff:    FSectionList.ControlEnterEvent := FormControlEnterEvent;
     FSectionList.OnBackgroundChange := BackgroundChange;
     FSectionList.ShowImages := True;
  +  FSectionList.GetImage := DoGetImage;
     FNameList := FSectionList.IDNameList;
   
     DefBackground := clBtnFace;
  
positive.code:     function GetWordAtCursor(X, Y: Integer; out St, En: Integer; out AWord: WideString): Boolean;
      procedure BackgroundChange(Sender: TObject);
      procedure DoHilite(X, Y: Integer); virtual;
      procedure DoImage(Sender: TObject; const SRC: ThtString; var Stream: TStream);
      procedure DoLogic;
      procedure DoScrollBars;
      procedure Draw(Canvas: TCanvas; YTop, FormatWidth, Width, Height: Integer);
      procedure DrawBorder;
      procedure FormControlEnterEvent(Sender: TObject);
      procedure HandleMeta(Sender: TObject; const HttpEq, Name, Content: ThtString);
      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 InitLoad;
      procedure Layout;
      procedure Parsed(const Title, Base, BaseTarget: ThtString);
      procedure ParseHtml;
  
negative.code:     FOnhtStreamRequest: TGetStreamEvent;
      FOnImageClick: TImageClickEvent;
      FOnImageOver: TImageOverEvent;
      FOnImageRequest: TGetImageEvent;
      FOnInclude: TIncludeType;
      FOnLink: TLinkType;
      FOnLinkDrawn: TLinkDrawnEvent;
  