anchor.diff:      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;
  
positive.code:     FNarrow: boolean;
      FOnResult: TAppFinderOperationEvent;
      FOnChangeOptions: TNotifyEvent;
      Adapter: TATAdapterEControl;
      AdapterActive: boolean;
      procedure DoResult(Str: TAppFinderOperation);
  
negative.code: procedure TfmFind.UpdateRegexHighlight;
  var
    bActive: boolean;
    TempLexer: TecSyntAnalyzer;
  begin
    bActive:= chkRegex.Checked;
    if AdapterActive<>bActive then
  