anchor.diff:  
   
   procedure TEditorFrame.SetLexer(an: TecSyntAnalyzer);
  +begin
  +  SetLexer_Ex(Ed1, an);
  +end;
  +
  +procedure TEditorFrame.SetLexer_Ex(Ed: TATSynEdit; an: TecSyntAnalyzer);
   var
     an2: TecSyntAnalyzer;
   begin
  -  if IsFileTooBigForLexer(FileName) then
  -  begin
  -    Adapter.Lexer:= nil;
  -    exit
  +  if Ed=Ed1 then
  +  begin
  +    if IsFileTooBigForLexer(FFileName) then
  +    begin
  +      Adapter.Lexer:= nil;
  +      exit;
  +    end;
  +  end
  +  else
  +  begin
  +    if IsFileTooBigForLexer(FFileName2) then
  +    begin
  +      if Assigned(Adapter2) then
  +        Adapter2.Lexer:= nil;
  +      exit;
  +    end;
     end;
   
     if AllowFrameParsing then
     begin
       if Assigned(an) then
       begin
  -      Ed1.AdapterForHilite:= Adapter;
  -      Ed2.AdapterForHilite:= Adapter;
  +      if EditorsLinked then
  +      begin
  +        Ed1.AdapterForHilite:= Adapter;
  +        Ed2.AdapterForHilite:= Adapter;
  +      end
  +      else
  +      begin
  +        Ed1.AdapterForHilite:= Adapter;
  +        if Adapter2=nil then
  +          Adapter2:= TATAdapterEControl.Create(Self);
  +        Ed2.AdapterForHilite:= Adapter2;
  +      end;
  +
         if not DoApplyLexerStylesMap(an, an2) then
           DoDialogLexerStylesMap(an2);
       end
       else
       begin
  -      Ed1.Fold.Clear;
  -      Ed2.Fold.Clear;
  -      Ed1.Update;
  -      Ed2.Update;
  +      Ed.Fold.Clear;
  +      Ed.Update;
  +      if (Ed=Ed1) and EditorsLinked then
  +      begin
  +        Ed2.Fold.Clear;
  +        Ed2.Update;
  +      end;
       end;
   
  -    Adapter.Lexer:= an;
  +    if Ed.AdapterForHilite is TATAdapterEControl then
  +      TATAdapterEControl(Ed.AdapterForHilite).Lexer:= an;
     end
     else
     begin
       FInitialLexer:= an;
       //support on_lexer
  -    DoPyEvent(Ed1, cEventOnLexer, []);
  +    DoPyEvent(Ed, cEventOnLexer, []);
     end;
   end;
   
  
positive.code:     procedure SetFileName(const AValue: string);
      procedure SetFileName2(AValue: string);
      procedure SetFileWasBig(AValue: boolean);
      procedure SetLocked(AValue: boolean);
      procedure SetModified(AValue: boolean);
      procedure SetNotifEnabled(AValue: boolean);
  
negative.code:     Ed1: TATSynEdit;
      Ed2: TATSynEdit;
      Adapter: TATAdapterEControl;
      Adapter2: TATAdapterEControl;
      Groups: TATGroups;
      CachedTreeview: TTreeView;
  
  