Martijn Laan 6 年之前
父节点
当前提交
e0881950a9
共有 1 个文件被更改,包括 4 次插入2 次删除
  1. 4 2
      Projects/Wizard.pas

+ 4 - 2
Projects/Wizard.pas

@@ -721,8 +721,6 @@ begin
     end;
   end;
   InitializeFont;
-  Constraints.MinHeight := Height;
-  Constraints.MinWidth := Width;
   if shWindowVisible in SetupHeader.Options then
     CenterInsideControl(MainForm, True)
   else
@@ -760,6 +758,10 @@ begin
     end;
     ClientWidth := SaveClientWidth;
     ClientHeight := SaveClientHeight;
+    if shWizardResizable in SetupHeader.Options then begin
+      Constraints.MinHeight := Height;
+      Constraints.MinWidth := Width;
+    end;
   end;
 
   { Position the buttons, and scale their size }