IDE: Fix TabOrder in FormEditor options. Issue #28346, patch from Alexey Torgashin.

git-svn-id: trunk@49462 -
This commit is contained in:
juha 2015-06-28 12:27:56 +00:00
parent 23077a602f
commit 4c5a14004b

View File

@ -17,24 +17,24 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 232
Height = 183
Height = 153
Top = 0
Width = 537
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Left = 6
Caption = 'GridGroupBox'
ClientHeight = 158
ClientHeight = 133
ClientWidth = 533
TabOrder = 0
TabOrder = 1
object GridSizeXLabel: TLabel
AnchorSideLeft.Control = GridGroupBox
AnchorSideTop.Control = GridSizeXSpinEdit
AnchorSideTop.Side = asrCenter
Left = 6
Height = 20
Top = 94
Width = 100
Height = 15
Top = 79
Width = 77
BorderSpacing.Around = 6
Caption = 'GridSizeXLabel'
ParentColor = False
@ -44,9 +44,9 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideTop.Control = GridSizeYSpinEdit
AnchorSideTop.Side = asrCenter
Left = 6
Height = 20
Top = 128
Width = 99
Height = 15
Top = 108
Width = 77
BorderSpacing.Around = 6
Caption = 'GridSizeYLabel'
ParentColor = False
@ -58,24 +58,24 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = GridGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Top = 60
Width = 166
Height = 19
Top = 50
Width = 134
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Right = 6
Caption = 'SnapToGridCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 1
TabOrder = 2
end
object ShowGridCheckBox: TCheckBox
AnchorSideLeft.Control = GridGroupBox
AnchorSideTop.Control = GridGroupBox
Left = 6
Height = 24
Height = 19
Top = 6
Width = 152
Width = 123
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'ShowGridCheckBox'
@ -88,24 +88,24 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideTop.Control = ShowGridCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 24
Top = 33
Width = 209
Height = 19
Top = 28
Width = 167
BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = 'ShowBorderSpaceCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 2
TabOrder = 1
end
object GridSizeXSpinEdit: TSpinEdit
AnchorSideLeft.Control = GridSizeXLabel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = SnapToGridCheckBox
AnchorSideTop.Side = asrBottom
Left = 112
Height = 28
Top = 90
Left = 89
Height = 23
Top = 75
Width = 64
BorderSpacing.Around = 6
MaxValue = 128
@ -120,9 +120,9 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = GridSizeXSpinEdit
AnchorSideTop.Side = asrBottom
Left = 111
Height = 28
Top = 124
Left = 89
Height = 23
Top = 104
Width = 64
BorderSpacing.Around = 6
MaxValue = 128
@ -142,16 +142,16 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 250
Top = 283
Height = 205
Top = 238
Width = 769
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 6
Caption = 'FormEditMiscGroupBox'
ClientHeight = 225
ClientHeight = 185
ClientWidth = 765
TabOrder = 1
TabOrder = 3
object ShowComponentCaptionsCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
AnchorSideTop.Control = RubberbandSelectsGrandChildsCheckBox
@ -159,16 +159,16 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = FormEditMiscGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Top = 33
Width = 260
Height = 19
Top = 28
Width = 212
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Right = 6
Caption = 'ShowComponentCaptionsCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 0
TabOrder = 1
end
object ShowEditorHintsCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
@ -177,16 +177,16 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = FormEditMiscGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Top = 60
Width = 198
Height = 19
Top = 50
Width = 160
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Right = 6
Caption = 'ShowEditorHintsCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 1
TabOrder = 2
end
object OpenDesignerOnOpenUnitCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
@ -195,16 +195,16 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = FormEditMiscGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Top = 87
Width = 265
Height = 19
Top = 72
Width = 214
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Right = 6
Caption = 'OpenDesignerOnOpenUnitCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 2
TabOrder = 3
end
object RightClickSelectsCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
@ -213,15 +213,15 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = FormEditMiscGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Top = 114
Width = 200
Height = 19
Top = 94
Width = 162
BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = 'RightClickSelectsCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 3
TabOrder = 4
end
object DesignerPaintLazyCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
@ -230,24 +230,24 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = FormEditMiscGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Top = 141
Width = 209
Height = 19
Top = 116
Width = 168
BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = 'DesignerPaintLazyCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 4
TabOrder = 5
end
object CreateCompFocusNameCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
AnchorSideTop.Control = DesignerPaintLazyCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 24
Top = 168
Width = 248
Height = 19
Top = 138
Width = 202
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Bottom = 3
@ -255,7 +255,7 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
OnChange = CreateCompFocusNameCheckBoxChange
ParentShowHint = False
ShowHint = True
TabOrder = 5
TabOrder = 6
end
object RubberbandSelectsGrandChildsCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
@ -263,7 +263,7 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = FormEditMiscGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Height = 19
Top = 6
Width = 759
Anchors = [akTop, akLeft, akRight]
@ -272,38 +272,38 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
Caption = 'RubberbandSelectsGrandChildsCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 6
TabOrder = 0
end
object CheckPackagesOnFormCreateCheckBox: TCheckBox
AnchorSideLeft.Control = FormEditMiscGroupBox
AnchorSideTop.Control = SwitchToFavoritesOITabCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 24
Top = 195
Width = 284
Height = 19
Top = 160
Width = 232
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Bottom = 6
Caption = 'CheckPackagesOnFormCreateCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 7
TabOrder = 8
end
object SwitchToFavoritesOITabCheckBox: TCheckBox
AnchorSideLeft.Control = CreateCompFocusNameCheckBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CreateCompFocusNameCheckBox
AnchorSideTop.Side = asrCenter
Left = 274
Height = 24
Top = 168
Width = 247
Left = 228
Height = 19
Top = 138
Width = 200
BorderSpacing.Left = 20
Caption = 'SwitchToFavoritesOITabCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 8
TabOrder = 7
end
end
object GuideLinesGroupBox: TGroupBox
@ -315,15 +315,15 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 232
Height = 88
Top = 189
Height = 73
Top = 159
Width = 537
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'GuideLinesGroupBox'
ClientHeight = 63
ClientHeight = 53
ClientWidth = 533
TabOrder = 2
object ShowGuideLinesCheckBox: TCheckBox
@ -331,7 +331,7 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = GuideLinesGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Height = 19
Top = 6
Width = 521
Anchors = [akTop, akLeft, akRight]
@ -350,8 +350,8 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideRight.Control = GuideLinesGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 24
Top = 33
Height = 19
Top = 28
Width = 521
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
@ -372,20 +372,20 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideBottom.Control = GuideLinesGroupBox
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 277
Height = 232
Top = 0
Width = 226
Anchors = [akTop, akLeft, akBottom]
Caption = 'DesignerColorsGroupBox'
ClientHeight = 252
ClientHeight = 212
ClientWidth = 222
TabOrder = 3
TabOrder = 0
object ColorsListBox: TColorListBox
AnchorSideLeft.Control = DesignerColorsGroupBox
AnchorSideTop.Control = DesignerColorsGroupBox
AnchorSideBottom.Control = ColorBox
Left = 6
Height = 212
Height = 172
Top = 6
Width = 210
Style = [cbCustomColors]
@ -406,7 +406,7 @@ object FormEditorOptionsFrame: TFormEditorOptionsFrame
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 22
Top = 224
Top = 184
Width = 210
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
Anchors = [akLeft, akBottom]