anchor.diff:  
   procedure TEditorFrame.NotifDeletedNoClick(Sender: TObject);
   var
  -  Index: integer;
  +  EdIndex: integer;
     Ed: TATSynEdit;
   begin
  -  Index:= (Sender as TComponent).Tag;
  -  Ed:= EditorIndexToObj(Index);
  +  EdIndex:= (Sender as TComponent).Tag;
  +  Ed:= EditorIndexToObj(EdIndex);
     if Ed=nil then exit;
  -  DoHideNotificationPanel(NotifDeletedControls[Index]);
  +  DoHideNotificationPanel(NotifDeletedControls[EdIndex]);
     EditorFocus(Ed);
   end;
   
   procedure TEditorFrame.NotifDeletedYesClick(Sender: TObject);
   var
  -  Index: integer;
  +  EdIndex: integer;
     Ed: TATSynEdit;
   begin
  -  Index:= (Sender as TComponent).Tag;
  -  Ed:= EditorIndexToObj(Index);
  +  EdIndex:= (Sender as TComponent).Tag;
  +  Ed:= EditorIndexToObj(EdIndex);
     if Ed=nil then exit;
     Ed.DoCommand(cmd_FileClose, cInvokeAppInternal);
   end;
  
positive.code: 
  function TEditorFrame.GetFileWasBig(Ed: TATSynEdit): boolean;
  var
    Index: integer;
  begin
    Index:= EditorObjToIndex(Ed);
    if Index>=0 then
      Result:= FFileWasBig[Index]
    else
      Result:= false;
  end;
  
  function TEditorFrame.GetInitialLexer(Ed: TATSynEdit): TecSyntAnalyzer;
  var
    Index: integer;
  begin
    if EditorsLinked then
      Result:= FInitialLexer1
    else
    begin
      Index:= EditorObjToIndex(Ed);
      if Index=0 then
        Result:= FInitialLexer1
      else
        Result:= FInitialLexer2;
  
negative.code: 
  procedure TEditorFrame.SetInitialLexer(Ed: TATSynEdit; AValue: TecSyntAnalyzer);
  var
    EdIndex: integer;
  begin
    if EditorsLinked then
      FInitialLexer1:= AValue
    else
    begin
      EdIndex:= EditorObjToIndex(Ed);
      if EdIndex=0 then
        FInitialLexer1:= AValue
      else
        FInitialLexer2:= AValue;
  