1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
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
|
