anchor.diff:    Sep1: TMenuItem;
     Sep2: TMenuItem;
     Sep3: TMenuItem;
  +  kind: TATFinderTokensAllowed;
   begin
     SCaptionOptRegex:= 'Regular expression';
     SCaptionOptCase:= 'Case sensitive';
  
positive.code:     FMenuitemOptMulti:= TMenuItem.Create(Self);
      FMenuitemOptMulti.OnClick:= @chkMulLineClick;
  
      FMenuitemOptHiAll:= TMenuItem.Create(Self);
      FMenuitemOptHiAll.OnClick:= @chkHiAllClick;
  
  
negative.code:     FMenuitemOptWrapped: TMenuItem;
      FMenuitemOptInSel: TMenuItem;
      FMenuitemOptMulti: TMenuItem;
      FMenuitemOptTokens: TMenuItem;
      FMenuitemOptTokensSub: array[TATFinderTokensAllowed] of TMenuItem;
      FMenuitemOptHiAll: TMenuItem;
      FMenuitemFindFirst: TMenuItem;
      FMenuitemFindPrev: TMenuItem;
  