anchor.diff:    if (ResFilename<>'') and (ResLine>=0) then
     begin
       MsgStatus(Format(msgStatusGotoFileLineCol, [ResFilename, ResLine+1, ResCol+1]));
  -    if FileExists(ResFilename) then
  +    Frame:= FindFrameOfFilename(ResFilename);
  +    if Assigned(Frame) then
       begin
  -      DoFileOpen(ResFilename, '');
  +      Frame.SetFocus;
  +      Ed:= Frame.Editor;
         Ed.DoCaretSingle(ResCol, ResLine);
         Ed.DoGotoCaret(cEdgeTop);
         Ed.Update;
  
positive.code:   Ed: TATSynEdit;
    ItemProp: TATListboxItemProp;
    Params: TAppVariantArray;
  begin
    Ed:= CurrentEditor;
  
  
negative.code:     procedure DoOps_LoadOptions_Ui(cfg: TJSONConfig);
      procedure ShowWelcomeInfo;
      procedure DoOps_OnCreate;
      function FindFrameOfFilename(const AFileName: string): TEditorFrame;
      function FindFrameOfPreviewTab: TEditorFrame;
      procedure FixMainLayout;
      procedure FormFloatGroups1_OnEmpty(Sender: TObject);
  