anchor.diff:      end;
     end;
     //
  +  procedure _Init_WindowMaximized_Apply;
  +  begin
  +    if FNeedToMaximize then
  +    begin
  +      FNeedToMaximize:= false;
  +      WindowState:= wsMaximized;
  +    end;
  +  end;
  +  //
     procedure _Init_ApiOnStart;
     begin
       DoPyEvent(nil, cEventOnStart, []);
  
positive.code:   if FHandledOnShowPartly then exit;
  
    DoApplyInitialGroupSizes; //before FormLock to solve bad group-splitters pos, issue #3067
      //on Windows, change of Groups.Mode calls also DoOnTabFocus, which calls FormActivate,
      //which is too early, so we need to call FormActivate again lower
  
    FormLock(Self);
  
    _Init_WindowMaximized;
  
negative.code: procedure TfmMain.FormActivate(Sender: TObject);
  begin
    AppActiveForm:= Sender;
  end;
  
  procedure TfmMain.FormChangeBounds(Sender: TObject);
  