anchor.diff:  var
     fn: string;
     ini: TIniFile;
  +  SCaptionFindFirst,
  +  SCaptionFindPrev,
  +  SCaptionFindNext,
     SCaptionCount,
     SCaptionExtract,
     SCaptionSelect,
     SCaptionMark: string;
   begin
  +  SCaptionFindFirst:= 'Find first';
  +  SCaptionFindPrev:= 'Find previous';
  +  SCaptionFindNext:= 'Find next';
     SCaptionCount:= 'Count all';
     SCaptionExtract:= 'Extract RegEx matches';
     SCaptionSelect:= 'Select all';
  
positive.code:   private
      { private declarations }
      FPopupMore: TPopupMenu;
      FMenuitemCount: TMenuItem;
      FMenuitemExtract: TMenuItem;
      FMenuitemSelectAll: TMenuItem;
  
negative.code:     FMenuitemMarkAll:= TMenuItem.Create(Self);
      FMenuitemMarkAll.OnClick:= @bMarkAllClick;
  
      FPopupMore.Items.Add(FMenuitemFindFirst);
      FPopupMore.Items.Add(FMenuitemFindPrev);
      FPopupMore.Items.Add(FMenuitemFindNext);
      FPopupMore.Items.Add(FMenuitemCount);
      FPopupMore.Items.Add(FMenuitemExtract);
      FPopupMore.Items.Add(FMenuitemSelectAll);
      FPopupMore.Items.Add(FMenuitemMarkAll);
    end;
  
    FMenuitemFindFirst.Caption:= _MakeHint(SCaptionFindFirst, UiOps.HotkeyFindFirst);
    FMenuitemFindPrev.Caption:= _MakeHint(SCaptionFindPrev, UiOps.HotkeyFindPrev);
    FMenuitemFindNext.Caption:= _MakeHint(SCaptionFindNext, UiOps.HotkeyFindNext);
    FMenuitemCount.Caption:= _MakeHint(SCaptionCount, UiOps.HotkeyCountAll);
    FMenuitemExtract.Caption:= _MakeHint(SCaptionExtract, UiOps.HotkeyExtractAll);
    FMenuitemSelectAll.Caption:= _MakeHint(SCaptionSelect, UiOps.HotkeySelectAll);
  