anchor.diff:      FMenuitemOptMulti:= TMenuItem.Create(Self);
       FMenuitemOptMulti.OnClick:= @chkMulLineClick;
   
  +    FMenuitemOptTokens:= TMenuItem.Create(Self);
  +    for kind in TATFinderTokensAllowed do
  +    begin
  +      FMenuitemOptTokensSub[kind]:= TMenuItem.Create(Self);
  +      FMenuitemOptTokensSub[kind].Tag:= Ord(kind);
  +      FMenuitemOptTokensSub[kind].OnClick:= @MenuitemTokensClick;
  +      FMenuitemOptTokensSub[kind].RadioItem:= true;
  +      FMenuitemOptTokens.Add(FMenuitemOptTokensSub[kind]);
  +    end;
  +
       FMenuitemOptHiAll:= TMenuItem.Create(Self);
       FMenuitemOptHiAll.OnClick:= @chkHiAllClick;
   
  
positive.code:   FMenuitemRepGlobal.Shortcut:= TextToShortcut(UiOps.HotkeyReplaceGlobal);
  end;
  
  procedure TfmFind.bMoreClick(Sender: TObject);
  var
    P: TPoint;
  
negative.code:   SCaptionOptWrapped:= 'Wrapped search';
    SCaptionOptInSel:= 'Search in selection';
    SCaptionOptMulti:= 'Multi-line inputs';
    SCaptionOptTokens:= 'Allowed syntax elements';
    SCaptionOptHiAll:= 'Highlight all matches';
    SCaptionFindFirst:= 'Find first';
    SCaptionFindPrev:= 'Find previous';
  