anchor.diff:    DoOnChangeCaption;
   end;
   
  +procedure TEditorFrame.UpdateTabCaptionFromFilename;
  +begin
  +  if EditorsLinked then
  +  begin
  +    if FFileName='' then
  +      TabCaption:= GetUntitledCaption
  +    else
  +      TabCaption:= ExtractFileName_Fixed(FFileName);
  +  end
  +  else
  +  begin
  +    if (FFileName='') and (FFileName2='') then
  +      TabCaption:= GetUntitledCaption
  +    else
  +      TabCaption:= ExtractFileName_Fixed(FFileName) + '|' +
  +                   ExtractFileName_Fixed(FFileName2);
  +  end;
  +end;
  +
   procedure TEditorFrame.EditorOnClick(Sender: TObject);
   var
     NewAlt: boolean;
  
positive.code:     Ed1.Show;
    end;
  
    EditorClear(Editor);
    UpdateModifiedState;
  end;
  
  
negative.code: 
  procedure TEditorFrame.DoFileOpen_AsBinary(const AFileName: string; AMode: TATBinHexMode);
  begin
    FFileName:= AFileName;
    UpdateTabCaptionFromFilename;
  
    Ed1.Hide;
    Ed2.Hide;
  