anchor.diff:      if bEnableEventOpened then
         DoPyEvent(F.Ed2, cEventOnOpen, Params);
   
  -  if Visible and Result.Visible and Result.Enabled then
  -    Result.SetFocus;
  +  DoFocusResult;
   end;
   
   
  
positive.code:       OpenMode);
      MsgStatusFileOpened(AFileName, AFileName2);
  
      if bEnableEventOpened then
      begin
        SetLength(Params, 0);
        DoPyEvent(Result.Ed1, cEventOnOpen, Params);
      end;
  
      Result.SetFocus;
      exit;
    end;
  
  
negative.code:     bEnableLoadUndo,
      OpenMode);
    Result:= F;
  
    UpdateStatusbar;
    MsgStatusFileOpened(AFileName, AFileName2);
  
    //set TabIndex before on_open firing, to fix CudaText #3314
    if Assigned(APages) then
      APages.Tabs.TabIndex:= APages.Tabs.FindTabByObject(F);
  
    SetLength(Params, 0);
  
  