anchor.diff:    AAllowLoadHistory, AAllowLexerDetect, AAllowErrorMsgBox: boolean;
     AOpenMode: TAppOpenMode);
   begin
  +  if Assigned(FBin) then
  +    FBin.Hide;
  +  if Assigned(FImageBox) then
  +    FImageBox.Hide;
  +
     if not FileExistsUTF8(AFileName) then exit;
     if (AFileName2<>'') then
       if not FileExistsUTF8(AFileName2) then exit;
  
positive.code:   Splitter.Hide;
    ReadOnly[Ed1]:= true;
  
    FImageBox:= TATImageBox.Create(Self);
    FImageBox.Parent:= Self;
    FImageBox.Align:= alClient;
    FImageBox.BorderStyle:= bsNone;
    FImageBox.OptFitToWindow:= true;
    FImageBox.OnScroll:= @DoImageboxScroll;
    FImageBox.OnKeyDown:= @BinaryOnKeyDown;
  
    try
      FImageBox.LoadFromFile(AFileName);
    except
    end;
  
negative.code:   DoOnChangeCaption;
    DoShow;
  
    if Visible and Enabled then
    begin
      if IsText then
      begin
        if Editor.Visible and Editor.Enabled then
          EditorFocus(Editor);
      end
      else
      if IsBinary then
      begin
        if Assigned(FBin) and FBin.Visible and FBin.CanFocus then
          EditorFocus(FBin);
      end
      else
      if IsPicture then
      begin
        if Assigned(FImageBox) and FImageBox.Visible and FImageBox.CanFocus then
          FImageBox.SetFocus;
      end;
    end;
  end;
  
  type
  