anchor.diff:      FNarrow: boolean;
       FOnResult: TAppFinderOperationEvent;
       FOnChangeOptions: TNotifyEvent;
  +    FLexerRegexThemed: boolean;
       Adapter: TATAdapterEControl;
       AdapterActive: boolean;
       procedure DoResult(Str: TAppFinderOperation);
  
positive.code:   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,
    StdCtrls, ExtCtrls,
    LclType, LclProc, IniFiles, Math,
    ATButtons, ATPanelSimple,
    ATStringProc,
    ATSynEdit,
    ATSynEdit_Edits,
    ATSynEdit_Commands,
    ATSynEdit_Finder,
    ATSynEdit_Adapter_EControl,
    ATSynEdit_CanvasProc,
    proc_msg,
    proc_globdata,
    proc_miscutils,
    proc_colors,
    proc_editor;
  
  type
    TAppFinderOperation = (
  
negative.code:     AdapterActive:= bActive;
      if AdapterActive then
      begin
        if not FLexerRegexThemed then
        begin
          FLexerRegexThemed:= true;
          if Assigned(Adapter.Lexer) then
            DoApplyLexerStylesMap(Adapter.Lexer, TempLexer);
        end;
  
        Adapter.AddEditor(edFind);
        edFind.DoEventChange();
        edFind.InvalidateHilitingCache;
  