anchor.diff:  end;
   
   procedure TfmFind.UpdateState;
  +var
  +  Ed: TATSynEdit;
   begin
     if IsReplace then
       Caption:= FCaptionReplace
  
positive.code:   bRepAll.Enabled:= IsReplace;
    bRepGlobal.Enabled:= IsReplace;
  
    if FBinaryMode then
    begin
      chkRegex.Enabled:= false;
      chkWrap.Enabled:= false;
      chkInSel.Enabled:= false;
    end;
  
    bFindFirst.Visible:= UiOps.FindShow_FindFirst;
  
negative.code:   Finder: TATEditorFinder;
  begin
    if edFind.Text='' then exit;
    if not chkHiAll.Enabled then exit;
  
    FOnGetMainEditor(Ed);
    if Ed.Attribs.Count>0 then
    begin
      Ed.Attribs.DeleteWithTag(UiOps.FindAttribTagForHighlightMatches);
      Ed.Update;
    end;
  
    if IsHiAll then
    begin
      Finder:= TATEditorFinder.Create;
      try
        Finder.Editor:= Ed;
        Finder.StrFind:= edFind.Text;
        Finder.OptConfirmReplace:= false;
        Finder.OptFromCaret:= false;
        Finder.OptInSelection:= chkInSel.Checked;
        Finder.OptPutBackwardSelection:= false;
        Finder.OptBack:= false;
        Finder.OptCase:= chkCase.Checked;
        Finder.OptWords:= chkWords.Checked;
        Finder.OptRegex:= chkRegex.Checked;
        Finder.OptTokens:= TATFinderTokensAllowed(bTokens.ItemIndex);
        Finder.OptWrapped:= false;
        Finder.OnGetToken:= FOnGetToken;
        EditorFindHighlightMatches(Finder);
      finally
        FreeAndNil(Finder);
      end;
    end;
  end;
  
  