339f88d3cd
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2764 8e941d3f-bd1b-0410-a28a-d453659cc2b4
106 lines
2.2 KiB
Plaintext
106 lines
2.2 KiB
Plaintext
object Form2: TForm2
|
|
Left = 555
|
|
Height = 252
|
|
Top = 328
|
|
Width = 499
|
|
Caption = 'Form2'
|
|
ClientHeight = 252
|
|
ClientWidth = 499
|
|
KeyPreview = True
|
|
OnActivate = FormActivate
|
|
OnClose = FormClose
|
|
OnCloseQuery = FormCloseQuery
|
|
OnCreate = FormCreate
|
|
OnDeactivate = FormDeactivate
|
|
OnDestroy = FormDestroy
|
|
OnHide = FormHide
|
|
OnKeyDown = FormKeyDown
|
|
OnShow = FormShow
|
|
LCLVersion = '1.1'
|
|
object Edit1: TEdit
|
|
Left = 48
|
|
Height = 23
|
|
Top = 72
|
|
Width = 403
|
|
Anchors = [akTop, akLeft, akRight]
|
|
TabOrder = 0
|
|
Text = 'Edit1'
|
|
end
|
|
object Edit2: TEdit
|
|
Left = 48
|
|
Height = 23
|
|
Top = 128
|
|
Width = 403
|
|
Anchors = [akTop, akLeft, akRight]
|
|
TabOrder = 2
|
|
Text = 'Edit2'
|
|
end
|
|
object CheckBox1: TCheckBox
|
|
Left = 48
|
|
Height = 19
|
|
Top = 98
|
|
Width = 90
|
|
Caption = 'Disable Edit 1'
|
|
Checked = True
|
|
OnChange = CheckBox1Change
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
end
|
|
object bClose: TButton
|
|
Left = 365
|
|
Height = 25
|
|
Top = 192
|
|
Width = 86
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
Caption = 'Close Form'
|
|
OnClick = bCloseClick
|
|
TabOrder = 5
|
|
end
|
|
object Label2: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideLeft.Side = asrCenter
|
|
Left = 44
|
|
Height = 30
|
|
Top = 16
|
|
Width = 410
|
|
Alignment = taCenter
|
|
Caption = 'This Form does NOT have Max Constraints. It will be Aligned by "alClient". '#13#10'Design forms like this using Anchors to expand controls all over the Page'
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = bClose
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = bClose
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 350
|
|
Height = 15
|
|
Top = 223
|
|
Width = 117
|
|
BorderSpacing.Top = 6
|
|
Caption = 'This Form is not Freed'
|
|
ParentColor = False
|
|
end
|
|
object bToggle1: TButton
|
|
Left = 48
|
|
Height = 25
|
|
Top = 192
|
|
Width = 75
|
|
Caption = 'Toggle 1'
|
|
OnClick = bToggle1Click
|
|
TabOrder = 3
|
|
end
|
|
object bToggle2: TButton
|
|
Left = 144
|
|
Height = 25
|
|
Top = 192
|
|
Width = 75
|
|
Caption = 'Toggle 2'
|
|
Enabled = False
|
|
OnClick = bToggle1Click
|
|
TabOrder = 4
|
|
end
|
|
end
|