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
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
|
object SimpleWebSrvOptsFrame: TSimpleWebSrvOptsFrame
Left = 0
Height = 437
Top = 0
Width = 565
ClientHeight = 437
ClientWidth = 565
TabOrder = 0
DesignLeft = 469
DesignTop = 358
object ServerAddrLabel: TLabel
AnchorSideTop.Control = ServerExeComboBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ServerAddrComboBox
Left = 8
Height = 15
Top = 61
Width = 44
BorderSpacing.Left = 20
BorderSpacing.Right = 2
Caption = 'Address'
ParentColor = False
end
object ServerAddrComboBox: TComboBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ServerAddrLabel
AnchorSideTop.Side = asrBottom
Left = 6
Height = 32
Top = 78
Width = 136
BorderSpacing.Left = 6
BorderSpacing.Top = 2
BorderSpacing.Bottom = 6
ItemHeight = 0
TabOrder = 0
Text = '127.0.0.1'
end
object PortLabel: TLabel
AnchorSideLeft.Control = ServerAddrLabel
AnchorSideTop.Control = ServerAddrComboBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = PortComboBox
Left = 8
Height = 15
Top = 116
Width = 24
BorderSpacing.Top = 6
BorderSpacing.Right = 2
Caption = 'Port'
ParentColor = False
end
object PortComboBox: TComboBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = PortLabel
AnchorSideTop.Side = asrBottom
Left = 6
Height = 32
Top = 133
Width = 100
BorderSpacing.Left = 6
BorderSpacing.Top = 2
BorderSpacing.Bottom = 6
ItemHeight = 0
TabOrder = 1
Text = '7777'
end
object ServerExeLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 6
Height = 15
Top = 6
Width = 113
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Path of simpleserver'
ParentColor = False
end
object ServerExeComboBox: TComboBox
AnchorSideLeft.Control = ServerExeLabel
AnchorSideTop.Control = ServerExeLabel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ServerExeBrowseButton
Left = 6
Height = 32
Top = 23
Width = 528
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 2
BorderSpacing.Bottom = 6
ItemHeight = 0
TabOrder = 2
Text = 'simpleserver'
end
object ServerExeBrowseButton: TButton
AnchorSideTop.Control = ServerExeComboBox
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ServerExeComboBox
AnchorSideBottom.Side = asrBottom
Left = 534
Height = 32
Top = 23
Width = 25
Anchors = [akTop, akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 6
Caption = '...'
TabOrder = 3
OnClick = ServerExeBrowseButtonClick
end
object BindAnyCheckBox: TCheckBox
AnchorSideLeft.Control = ServerAddrComboBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ServerAddrComboBox
AnchorSideTop.Side = asrCenter
Left = 148
Height = 23
Top = 83
Width = 123
BorderSpacing.Left = 6
Caption = 'Bind Any (0.0.0.0)'
TabOrder = 4
end
object ServerOptsLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = PortComboBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 15
Top = 171
Width = 268
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Server extra command-line options (one per line)'
ParentColor = False
end
object BrowserKindComboBox: TComboBox
AnchorSideLeft.Control = BrowserLabel
AnchorSideTop.Control = BrowserLabel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 6
Height = 31
Top = 293
Width = 186
BorderSpacing.Top = 2
BorderSpacing.Right = 6
ItemHeight = 0
Style = csDropDownList
TabOrder = 5
OnSelect = BrowserKindComboBoxSelect
end
object BrowserLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ServerOptionsMemo
AnchorSideTop.Side = asrBottom
Left = 6
Height = 15
Top = 276
Width = 258
BorderSpacing.Left = 6
BorderSpacing.Top = 15
Caption = 'Browser to launch when opening project HTML'
ParentColor = False
end
object ServerOptionsMemo: TMemo
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ServerOptsLabel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 73
Top = 188
Width = 553
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 2
BorderSpacing.Right = 6
TabOrder = 6
end
object BrowserCmdComboBox: TComboBox
AnchorSideLeft.Control = BrowserKindComboBox
AnchorSideTop.Control = BrowserKindComboBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = BrowseBrowserButton
Left = 21
Height = 32
Top = 326
Width = 513
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 15
BorderSpacing.Top = 2
ItemHeight = 0
TabOrder = 7
Text = 'BrowserCmdComboBox'
OnChange = BrowserCmdComboBoxChange
end
object BrowseBrowserButton: TButton
AnchorSideTop.Control = BrowserCmdComboBox
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = BrowserCmdComboBox
AnchorSideBottom.Side = asrBottom
Left = 534
Height = 32
Top = 326
Width = 25
Anchors = [akTop, akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 6
Caption = '...'
ParentShowHint = False
ShowHint = True
TabOrder = 8
OnClick = BrowseBrowserButtonClick
end
end
|
