From 2782723bca79e2f9fbd771ef40b3999723a26f8c Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sun, 1 Nov 2020 22:30:14 +0000
Subject: [PATCH] LazStats: Fix TabOrder in SensUnit.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7835 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 .../forms/analysis/nonparametric/sensunit.lfm | 26 +++++++++++--------
 1 file changed, 15 insertions(+), 11 deletions(-)

diff --git a/applications/lazstats/source/forms/analysis/nonparametric/sensunit.lfm b/applications/lazstats/source/forms/analysis/nonparametric/sensunit.lfm
index 0cbb2064f..750f81e21 100644
--- a/applications/lazstats/source/forms/analysis/nonparametric/sensunit.lfm
+++ b/applications/lazstats/source/forms/analysis/nonparametric/sensunit.lfm
@@ -16,19 +16,23 @@ inherited SensForm: TSensForm
     inherited CloseBtn: TButton
       Left = 289
       Top = 375
+      TabOrder = 12
     end
     inherited ComputeBtn: TButton
       Left = 205
       Top = 375
+      TabOrder = 11
     end
     inherited ResetBtn: TButton
       Left = 143
       Top = 375
+      TabOrder = 10
     end
     inherited HelpBtn: TButton
       Tag = 166
       Left = 84
       Top = 375
+      TabOrder = 9
     end
     inherited ButtonBevel: TBevel
       Top = 359
@@ -62,7 +66,7 @@ inherited SensForm: TSensForm
       MultiSelect = True
       OnDblClick = VarListDblClick
       OnSelectionChange = VarListSelectionChange
-      TabOrder = 4
+      TabOrder = 0
     end
     object InBtn: TBitBtn[7]
       AnchorSideLeft.Control = ParamsPanel
@@ -76,7 +80,7 @@ inherited SensForm: TSensForm
       ImageIndex = 1
       OnClick = InBtnClick
       Spacing = 0
-      TabOrder = 5
+      TabOrder = 1
     end
     object OutBtn: TBitBtn[8]
       AnchorSideLeft.Control = ParamsPanel
@@ -92,7 +96,7 @@ inherited SensForm: TSensForm
       ImageIndex = 0
       OnClick = OutBtnClick
       Spacing = 0
-      TabOrder = 6
+      TabOrder = 2
     end
     object AllBtn: TBitBtn[9]
       AnchorSideLeft.Control = ParamsPanel
@@ -108,7 +112,7 @@ inherited SensForm: TSensForm
       Caption = 'All'
       OnClick = AllBtnClick
       Spacing = 0
-      TabOrder = 7
+      TabOrder = 3
     end
     object GroupBox3: TGroupBox[10]
       AnchorSideTop.Control = GroupBox1
@@ -130,7 +134,7 @@ inherited SensForm: TSensForm
       ChildSizing.Layout = cclLeftToRightThenTopToBottom
       ClientHeight = 81
       ClientWidth = 120
-      TabOrder = 8
+      TabOrder = 6
       object PrtDataChk: TCheckBox
         Left = 12
         Height = 19
@@ -172,7 +176,7 @@ inherited SensForm: TSensForm
       ChildSizing.Layout = cclLeftToRightThenTopToBottom
       ClientHeight = 52
       ClientWidth = 120
-      TabOrder = 9
+      TabOrder = 7
       object PlotSlopesChk: TCheckBox
         Left = 12
         Height = 19
@@ -211,7 +215,7 @@ inherited SensForm: TSensForm
       ChildSizing.ControlsPerLine = 2
       ClientHeight = 31
       ClientWidth = 337
-      TabOrder = 10
+      TabOrder = 5
       object StandardizeChk: TCheckBox
         Left = 12
         Height = 19
@@ -252,7 +256,7 @@ inherited SensForm: TSensForm
       Alignment = taRightJustify
       BorderSpacing.Left = 8
       BorderSpacing.Top = 8
-      TabOrder = 11
+      TabOrder = 8
       Text = '0.05'
     end
     object Label3: TLabel[15]
@@ -285,7 +289,7 @@ inherited SensForm: TSensForm
       MultiSelect = True
       OnDblClick = SelectedListDblClick
       OnSelectionChange = VarListSelectionChange
-      TabOrder = 12
+      TabOrder = 4
     end
   end
   inherited ParamsSplitter: TSplitter
@@ -297,13 +301,13 @@ inherited SensForm: TSensForm
     Height = 400
     Top = 8
     Width = 563
-    ActivePage = RankedSlopesPage
+    ActivePage = ResultsPage
     Align = alClient
     BorderSpacing.Left = 4
     BorderSpacing.Top = 8
     BorderSpacing.Right = 8
     BorderSpacing.Bottom = 8
-    TabIndex = 3
+    TabIndex = 0
     TabOrder = 2
     object ResultsPage: TTabSheet
       Caption = 'Results'