paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-11 21:55:56 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
git-svn-id: trunk@49462 -
This commit is contained in:
juha 2015-06-28 12:27:56 +00:00
parent 23077a602f
commit 4c5a14004b
1 changed files with 75 additions and 75 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

150
ide/frames/formed_options.lfm
View File

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