anchor.diff:    CurrentTopic := nil;  // it was a reference only
     FFileOpenRecent := nil;   // it was a reference only
     miOpenRecentMenu.Free;
  -  DestroyListAndObjects(Files);
  +//  DestroyListAndObjects(Files);
     DestroyListAndObjects(AllFilesWordSequences);
     DestroyListAndObjects(CurrentOpenFiles);
     inherited Destroy;
  
positive.code:     btnHelp: TfpgButton;
      {@VFD_HEAD_END: MainForm}
      miOpenRecentMenu: TfpgPopupMenu;
      Files: TList; // current open help files.
      Debug: boolean;
      FFileOpenRecent: TfpgMenuItem;
      FHistorySelection: Boolean;
  
negative.code: begin
    tvContents.Selection := nil;
    tvContents.RootNode.Clear;
  
    lbSearchResults.Items.Clear;
    edSearchText.Clear;
    lbHistory.Items.Clear;
  
    RichView.Clear(ADestroying);
    if not ADestroying then
    begin
  