NiceGrid: Position controls in Lazarus version of basic_demo by means of anchoring.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8864 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-06-28 14:45:37 +00:00
parent af0c9d21e7
commit 8e2c01fd88

View File

@ -102,11 +102,14 @@ object MainForm: TMainForm
TabOrder = 1
end
object CheckBox2: TCheckBox
Left = 88
AnchorSideLeft.Control = CheckBox1
AnchorSideLeft.Side = asrBottom
Left = 69
Height = 19
Top = 464
Width = 93
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 16
Caption = 'System Colors'
Checked = True
OnClick = CheckBox2Click
@ -114,31 +117,40 @@ object MainForm: TMainForm
TabOrder = 2
end
object CheckBox3: TCheckBox
Left = 192
AnchorSideLeft.Control = CheckBox2
AnchorSideLeft.Side = asrBottom
Left = 178
Height = 19
Top = 464
Width = 80
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 16
Caption = 'Fit to Width'
OnClick = CheckBox3Click
TabOrder = 3
end
object CheckBox4: TCheckBox
Left = 288
AnchorSideLeft.Control = CheckBox3
AnchorSideLeft.Side = asrBottom
Left = 274
Height = 19
Top = 464
Width = 125
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 16
Caption = 'Auto Column Width'
OnClick = CheckBox4Click
TabOrder = 4
end
object CheckBox5: TCheckBox
Left = 424
AnchorSideLeft.Control = CheckBox4
AnchorSideLeft.Side = asrBottom
Left = 415
Height = 19
Top = 464
Width = 77
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 16
Caption = 'Show Grids'
Checked = True
OnClick = CheckBox5Click
@ -146,11 +158,14 @@ object MainForm: TMainForm
TabOrder = 5
end
object Button1: TButton
Left = 272
AnchorSideLeft.Control = Button3
AnchorSideLeft.Side = asrBottom
Left = 284
Height = 25
Top = 501
Width = 129
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 16
Caption = '&Hide 3rd Column'
OnClick = Button1Click
TabOrder = 8
@ -159,39 +174,50 @@ object MainForm: TMainForm
Left = 16
Height = 25
Top = 501
Width = 121
Width = 108
Anchors = [akLeft, akBottom]
AutoSize = True
Caption = '&Insert New Row'
OnClick = Button2Click
TabOrder = 6
end
object Button3: TButton
Left = 144
AnchorSideLeft.Control = Button2
AnchorSideLeft.Side = asrBottom
Left = 140
Height = 25
Top = 501
Width = 121
Width = 128
Anchors = [akLeft, akBottom]
AutoSize = True
BorderSpacing.Left = 16
Caption = '&Delete Current Row'
OnClick = Button3Click
TabOrder = 7
end
object Button4: TButton
Left = 416
AnchorSideLeft.Control = Button1
AnchorSideLeft.Side = asrBottom
Left = 429
Height = 25
Top = 501
Width = 182
Anchors = [akLeft, akBottom]
AutoSize = True
BorderSpacing.Left = 16
Caption = 'Toggle ReadOnly 3rd Column'
OnClick = Button4Click
TabOrder = 9
end
object CheckBox6: TCheckBox
Left = 528
AnchorSideLeft.Control = CheckBox5
AnchorSideLeft.Side = asrBottom
Left = 508
Height = 19
Top = 464
Width = 84
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 16
Caption = 'Show Footer'
OnClick = CheckBox6Click
TabOrder = 10