anchor.diff:        OpenMode);
       MsgStatusFileOpened(AFileName, AFileName2);
   
  -    DoFocusResult;
  +    DoFocusFrame(Result);
       if bEnableEventOpened then
       begin
         DoPyEvent_Open(Result.Ed1);
  
positive.code: function TfmMain.DoFileOpen(AFileName, AFileName2: string; APages: TATPages;
    const AOptions: string): TEditorFrame;
    //
    procedure DoFocusResult;
    begin
      if Assigned(Result) then
        if Visible and Result.Enabled then
        begin
          SetFrame(Result);
          Result.SetFocus;
        end;
    end;
    //
  
negative.code:     if AFileName2<>'' then
        DoPyEvent_Open(F.Ed2);
  
    DoFocusFrame(Result);
  end;
  
  
  