Open forms change size when closing another

Question

Have forms of the kind fsMDIChild that are set to start maximized (wsMaximized). They open normally, however when I close some of them the others change their state to WsNormal.

I wonder if there’s any way to avoid it, even if it’s forced so the size doesn’t change.

Code of insertion of the Forms:

  if not Assigned(frmfornecedor) then
  begin
     frmfornecedor := tfrmfornecedor.create(frmPrincipal);
  end;

At the event OnClose of the Forms there is only one Close and nothing more.

Answer 1

This must have been caused by some change in the properties of the form FrmFornecedor because I could not reproduce this problem, check the property AutoSize is marked as False.

At the event OnClose() form FrmFornecedor instead of using Close, use:

procedure TFrmFornecedor.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;