anchor.diff:    FFileName2:= '';
     UpdateCaptionFromFilename;
   
  +  //clear viewer
     if Assigned(FBin) then
     begin
  -    FBin.OpenStream(nil);
  +    FBin.OpenStream(nil, false);
       FreeAndNil(FBin);
   
       if Assigned(FBinStream) then
  
positive.code: 
  procedure TEditorFrame.DoFileClose;
  begin
    Lexer[Ed1]:= nil;
    if not EditorsLinked then
      Lexer[Ed2]:= nil;
  
negative.code:     Ed1.Show;
    end;
  
    //clear picture
    if Assigned(FImageBox) then
    begin
      FreeAndNil(FImageBox);
      Ed1.Show;
    end;
  
    //clear editors
    EditorClear(Ed1);
    if not EditorsLinked then
      EditorClear(Ed2);
  