mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-08 20:52:46 +02:00
153 lines
3.5 KiB
Plaintext
153 lines
3.5 KiB
Plaintext
object TestControlForm: TTestControlForm
|
|
Left = 1197
|
|
Height = 350
|
|
Top = 104
|
|
Width = 456
|
|
BorderIcons = []
|
|
Caption = 'Test Control'
|
|
ClientHeight = 350
|
|
ClientWidth = 456
|
|
OnShow = FormShow
|
|
LCLVersion = '1.1'
|
|
Visible = True
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 44
|
|
Top = 0
|
|
Width = 456
|
|
Align = alTop
|
|
AutoSize = True
|
|
ClientHeight = 44
|
|
ClientWidth = 456
|
|
TabOrder = 0
|
|
object CheckWriteLogs: TCheckBox
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 1
|
|
Height = 19
|
|
Top = 1
|
|
Width = 76
|
|
Caption = 'Write Logs'
|
|
OnChange = CheckWriteLogsChange
|
|
TabOrder = 0
|
|
end
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = EditLogDir
|
|
Left = 1
|
|
Height = 16
|
|
Top = 20
|
|
Width = 42
|
|
Align = alCustom
|
|
BorderSpacing.Right = 5
|
|
Caption = 'Log Dir:'
|
|
ParentColor = False
|
|
end
|
|
object EditLogDir: TEdit
|
|
AnchorSideLeft.Control = Label1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = CheckWriteLogs
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 48
|
|
Height = 23
|
|
Top = 20
|
|
Width = 407
|
|
Anchors = [akTop, akLeft, akRight]
|
|
OnChange = EditLogDirChange
|
|
TabOrder = 1
|
|
Text = 'EditLogDir'
|
|
end
|
|
object WriteLogsOnErr: TCheckBox
|
|
AnchorSideLeft.Control = CheckWriteLogs
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = CheckWriteLogs
|
|
Left = 87
|
|
Height = 19
|
|
Top = 1
|
|
Width = 123
|
|
BorderSpacing.Left = 10
|
|
Caption = 'Write Logs On Error'
|
|
Checked = True
|
|
OnChange = WriteLogsOnErrChange
|
|
State = cbChecked
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 0
|
|
Height = 306
|
|
Top = 44
|
|
Width = 456
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsHomogenousChildResize
|
|
ChildSizing.ShrinkVertical = crsHomogenousChildResize
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 3
|
|
ClientHeight = 306
|
|
ClientWidth = 456
|
|
TabOrder = 1
|
|
object Panel3: TPanel
|
|
Left = 0
|
|
Height = 306
|
|
Top = 0
|
|
Width = 154
|
|
Caption = 'Panel3'
|
|
ClientHeight = 306
|
|
ClientWidth = 154
|
|
TabOrder = 0
|
|
object CheckListBox1: TCheckListBox
|
|
Left = 1
|
|
Height = 279
|
|
Top = 1
|
|
Width = 152
|
|
Align = alClient
|
|
ItemHeight = 0
|
|
TabOrder = 0
|
|
end
|
|
object Panel4: TPanel
|
|
Left = 1
|
|
Height = 25
|
|
Top = 280
|
|
Width = 152
|
|
Align = alBottom
|
|
AutoSize = True
|
|
Caption = ' '
|
|
ClientHeight = 25
|
|
ClientWidth = 152
|
|
TabOrder = 1
|
|
object EdOnlyWatch: TEdit
|
|
Left = 1
|
|
Height = 23
|
|
Top = 1
|
|
Width = 150
|
|
Align = alClient
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
end
|
|
object chkFPC: TCheckListBox
|
|
Left = 154
|
|
Height = 306
|
|
Top = 0
|
|
Width = 152
|
|
ItemHeight = 0
|
|
TabOrder = 1
|
|
end
|
|
object chkGDB: TCheckListBox
|
|
Left = 306
|
|
Height = 306
|
|
Top = 0
|
|
Width = 150
|
|
ItemHeight = 0
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
end
|