From a37794f09fc12770bb534e98d78690b52392772f Mon Sep 17 00:00:00 2001
From: wp <wp.no-reply@lazarus-ide-org>
Date: Thu, 8 Oct 2020 19:36:41 +0000
Subject: [PATCH] IDE: Fix misplaced "Use max version" checkbox in
 TProjPackFilePropGui

git-svn-id: trunk@63977 -
---
 packager/projpackfilepropgui.pas | 44 +++++++++++++++++---------------
 1 file changed, 23 insertions(+), 21 deletions(-)

diff --git a/packager/projpackfilepropgui.pas b/packager/projpackfilepropgui.pas
index c86c6d4dd2..884f0a5c30 100644
--- a/packager/projpackfilepropgui.pas
+++ b/packager/projpackfilepropgui.pas
@@ -274,6 +274,16 @@ begin
 
   // dependency properties
   // ---------------------
+  MinVersionEdit := TEdit.Create(fOwner);
+  MinVersionEdit.Parent := fOwner;
+  MinVersionEdit.AnchorSideLeft.Side := asrBottom;
+  MinVersionEdit.Left := 201;
+  MinVersionEdit.Top := 0;
+  MinVersionEdit.Width := 100;
+  MinVersionEdit.BorderSpacing.Left := 10;
+  MinVersionEdit.TabOrder := 3;
+  MinVersionEdit.OnChange := @MinMaxVersionEditChange;
+
   UseMinVersionCheckBox := TCheckBox.Create(fOwner);
   UseMinVersionCheckBox.Parent := fOwner;
   UseMinVersionCheckBox.AnchorSideTop.Control := MinVersionEdit;
@@ -285,16 +295,20 @@ begin
   UseMinVersionCheckBox.Caption := lisPckEditMinimumVersion;
   UseMinVersionCheckBox.OnChange := @UseMinVersionCheckBoxChange;
 
-  MinVersionEdit := TEdit.Create(fOwner);
-  MinVersionEdit.Parent := fOwner;
   MinVersionEdit.AnchorSideLeft.Control := UseMinVersionCheckBox;
-  MinVersionEdit.AnchorSideLeft.Side := asrBottom;
-  MinVersionEdit.Left := 201;
-  MinVersionEdit.Top := 0;
-  MinVersionEdit.Width := 100;
-  MinVersionEdit.BorderSpacing.Left := 10;
-  MinVersionEdit.TabOrder := 3;
-  MinVersionEdit.OnChange := @MinMaxVersionEditChange;
+
+  MaxVersionEdit := TEdit.Create(fOwner);
+  MaxVersionEdit.Parent := fOwner;
+  MaxVersionEdit.AnchorSideLeft.Side := asrBottom;
+  MaxVersionEdit.AnchorSideTop.Control := MinVersionEdit;
+  MaxVersionEdit.AnchorSideTop.Side := asrBottom;
+  MaxVersionEdit.Left := 204;
+  MaxVersionEdit.Top := 38;
+  MaxVersionEdit.Width := 100;
+  MaxVersionEdit.BorderSpacing.Left := 10;
+  MaxVersionEdit.BorderSpacing.Top := 2;
+  MaxVersionEdit.TabOrder := 5;
+  MaxVersionEdit.OnChange := @MinMaxVersionEditChange;
 
   UseMaxVersionCheckBox := TCheckBox.Create(fOwner);
   UseMaxVersionCheckBox.Parent := fOwner;
@@ -307,19 +321,7 @@ begin
   UseMaxVersionCheckBox.Caption := lisPckEditMaximumVersion;
   UseMaxVersionCheckBox.OnChange := @UseMaxVersionCheckBoxChange;
 
-  MaxVersionEdit := TEdit.Create(fOwner);
-  MaxVersionEdit.Parent := fOwner;
   MaxVersionEdit.AnchorSideLeft.Control := UseMaxVersionCheckBox;
-  MaxVersionEdit.AnchorSideLeft.Side := asrBottom;
-  MaxVersionEdit.AnchorSideTop.Control := MinVersionEdit;
-  MaxVersionEdit.AnchorSideTop.Side := asrBottom;
-  MaxVersionEdit.Left := 204;
-  MaxVersionEdit.Top := 38;
-  MaxVersionEdit.Width := 100;
-  MaxVersionEdit.BorderSpacing.Left := 10;
-  MaxVersionEdit.BorderSpacing.Top := 2;
-  MaxVersionEdit.TabOrder := 5;
-  MaxVersionEdit.OnChange := @MinMaxVersionEditChange;
 
   ApplyDependencyButton := TButton.Create(fOwner);
   ApplyDependencyButton.Parent := fOwner;