Statistics
| Branch: | Tag: | Revision:

root / Client / UfrmLargeScaleCommand.lfm @ 13:c78b5eafa10e

History | View | Annotate | Download (48.2 kB)

1
object frmLargeScaleCommand: TfrmLargeScaleCommand
2
  Left = 290
3
  Height = 397
4
  Top = 171
5
  Width = 620
6
  ActiveControl = vstActions
7
  Caption = 'Large Scale Commands'
8
  ClientHeight = 397
9
  ClientWidth = 620
10
  Constraints.MinHeight = 390
11
  Constraints.MinWidth = 620
12
  Font.Height = -11
13
  OnCreate = FormCreate
14
  OnDestroy = FormDestroy
15
  OnShow = FormShow
16
  Position = poOwnerFormCenter
17
  ShowInTaskBar = stAlways
18
  LCLVersion = '0.9.25'
19
  object nbActions: TNotebook
20
    Left = 152
21
    Height = 364
22
    Width = 468
23
    Align = alClient
24
    PageIndex = 4
25
    ParentFont = True
26
    ShowTabs = False
27
    TabOrder = 0
28
    object pgArea: TPage
29
      Caption = 'pgArea'
30
      ClientWidth = 464
31
      ClientHeight = 335
32
      ParentFont = True
33
      object sbArea: TScrollBox
34
        Height = 335
35
        Width = 464
36
        Align = alClient
37
        TabOrder = 0
38
        object pbArea: TPaintBox
39
          Height = 105
40
          Width = 105
41
          OnMouseDown = pbAreaMouseDown
42
          OnMouseMove = pbAreaMouseMove
43
          OnPaint = pbAreaPaint
44
        end
45
      end
46
    end
47
    object pgCopyMove: TPage
48
      Caption = 'Copy/Move'
49
      ClientWidth = 464
50
      ClientHeight = 335
51
      ParentFont = True
52
      object rgCMAction: TRadioGroup
53
        Left = 12
54
        Height = 40
55
        Top = 12
56
        Width = 184
57
        AutoFill = True
58
        Caption = 'Action'
59
        ChildSizing.LeftRightSpacing = 6
60
        ChildSizing.TopBottomSpacing = 6
61
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
62
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
63
        ChildSizing.ShrinkHorizontal = crsScaleChilds
64
        ChildSizing.ShrinkVertical = crsScaleChilds
65
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
66
        ChildSizing.ControlsPerLine = 2
67
        ClientHeight = 23
68
        ClientWidth = 180
69
        Columns = 2
70
        ItemIndex = 0
71
        Items.Strings = (
72
          'Copy'
73
          'Move'
74
        )
75
        ParentFont = True
76
        TabOrder = 0
77
      end
78
      object gbCMOffset: TGroupBox
79
        Left = 12
80
        Height = 81
81
        Top = 60
82
        Width = 121
83
        Caption = 'Offset'
84
        ClientHeight = 64
85
        ClientWidth = 117
86
        ParentFont = True
87
        TabOrder = 1
88
        object Label9: TLabel
89
          Left = 6
90
          Height = 13
91
          Top = 12
92
          Width = 12
93
          Caption = 'X:'
94
          ParentColor = False
95
          ParentFont = True
96
        end
97
        object Label10: TLabel
98
          Left = 6
99
          Height = 13
100
          Top = 36
101
          Width = 12
102
          Caption = 'Y:'
103
          ParentColor = False
104
          ParentFont = True
105
        end
106
        object seCMOffsetX: TSpinEdit
107
          Left = 30
108
          Height = 23
109
          Top = 8
110
          Width = 74
111
          ParentFont = True
112
          TabOrder = 0
113
        end
114
        object seCMOffsetY: TSpinEdit
115
          Left = 30
116
          Height = 23
117
          Top = 34
118
          Width = 74
119
          ParentFont = True
120
          TabOrder = 1
121
        end
122
      end
123
      object cbCMEraseTarget: TCheckBox
124
        Left = 20
125
        Height = 21
126
        Top = 148
127
        Width = 174
128
        Caption = 'Erase target area (at offset)'
129
        ParentFont = True
130
        TabOrder = 2
131
      end
132
    end
133
    object pgModifyAltitude: TPage
134
      Caption = 'Modify altitude'
135
      ClientWidth = 464
136
      ClientHeight = 335
137
      ParentFont = True
138
      object Label2: TLabel
139
        Left = 28
140
        Height = 43
141
        Top = 38
142
        Width = 142
143
        Caption = 'The statics will be elevated according to the terrain change.'
144
        Enabled = False
145
        ParentColor = False
146
        ParentFont = True
147
        WordWrap = True
148
      end
149
      object Label3: TLabel
150
        Left = 228
151
        Height = 28
152
        Top = 12
153
        Width = 125
154
        Caption = 'Set the altitude to a value from this range:'
155
        ParentColor = False
156
        ParentFont = True
157
        WordWrap = True
158
      end
159
      object Label4: TLabel
160
        Left = 288
161
        Height = 13
162
        Top = 49
163
        Width = 12
164
        Caption = 'to'
165
        ParentColor = False
166
        ParentFont = True
167
      end
168
      object rbSetTerrainAltitude: TRadioButton
169
        Left = 12
170
        Height = 21
171
        Top = 12
172
        Width = 124
173
        Caption = 'Set terrain altitude'
174
        Checked = True
175
        ParentFont = True
176
        State = cbChecked
177
        TabOrder = 0
178
      end
179
      object rbRelativeAltitudeChange: TRadioButton
180
        Left = 12
181
        Height = 21
182
        Top = 84
183
        Width = 156
184
        Caption = 'Relative altitude change'
185
        ParentFont = True
186
        TabOrder = 1
187
      end
188
      object seTerrainAltitude1: TSpinEdit
189
        Left = 228
190
        Height = 23
191
        Top = 46
192
        Width = 50
193
        MaxValue = 127
194
        MinValue = -128
195
        ParentFont = True
196
        TabOrder = 2
197
      end
198
      object seTerrainAltitude2: TSpinEdit
199
        Left = 308
200
        Height = 23
201
        Top = 46
202
        Width = 50
203
        MaxValue = 127
204
        MinValue = -128
205
        ParentFont = True
206
        TabOrder = 3
207
      end
208
      object seRelativeAltitude: TSpinEdit
209
        Left = 28
210
        Height = 23
211
        Top = 108
212
        Width = 50
213
        MaxValue = 127
214
        MinValue = -128
215
        ParentFont = True
216
        TabOrder = 4
217
      end
218
    end
219
    object pgDrawTerrain: TPage
220
      Caption = 'Draw Terrain'
221
      ClientWidth = 464
222
      ClientHeight = 335
223
      ParentFont = True
224
      object gbDrawTerrainTiles: TGroupBox
225
        Left = 8
226
        Height = 319
227
        Top = 8
228
        Width = 225
229
        Align = alLeft
230
        BorderSpacing.Around = 8
231
        Caption = 'Tiles'
232
        ClientHeight = 315
233
        ClientWidth = 221
234
        ParentFont = True
235
        TabOrder = 0
236
        object lblDrawTerrainTilesDesc: TLabel
237
          Left = 4
238
          Height = 58
239
          Width = 213
240
          Align = alTop
241
          BorderSpacing.Left = 4
242
          BorderSpacing.Right = 4
243
          BorderSpacing.Bottom = 4
244
          Caption = 'Drag terrain tiles from the main window and drop them on the list. For each cell in the target area, one of these (random) will be used.'
245
          ParentColor = False
246
          ParentFont = True
247
          WordWrap = True
248
        end
249
        object vdtTerrainTiles: TVirtualDrawTree
250
          Tag = 1
251
          Cursor = 63
252
          Left = 4
253
          Height = 223
254
          Top = 62
255
          Width = 213
256
          Align = alClient
257
          BorderSpacing.Left = 4
258
          BorderSpacing.Right = 4
259
          BorderSpacing.Bottom = 4
260
          DefaultNodeHeight = 44
261
          DragMode = dmAutomatic
262
          DragType = dtVCL
263
          Header.Options = [hoColumnResize, hoDrag, hoVisible]
264
          Header.ParentFont = True
265
          Header.Style = hsFlatButtons
266
          ParentFont = True
267
          TabOrder = 0
268
          TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning, toFullRowDrag]
269
          TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
270
          TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect]
271
          OnDragOver = vdtTerrainTilesDragOver
272
          OnDragDrop = vdtTerrainTilesDragDrop
273
          OnDrawNode = vdtTerrainTilesDrawNode
274
          Columns = <          
275
            item
276
              WideText = 'ID'
277
            end          
278
            item
279
              Position = 1
280
              Width = 44
281
              WideText = 'Tile'
282
            end          
283
            item
284
              Position = 2
285
              Width = 100
286
              WideText = 'Name'
287
            end>
288
        end
289
        object pnlDrawTerrainTilesControls: TPanel
290
          Height = 26
291
          Top = 289
292
          Width = 221
293
          Align = alBottom
294
          BevelOuter = bvNone
295
          ClientHeight = 26
296
          ClientWidth = 221
297
          ParentFont = True
298
          TabOrder = 1
299
          object btnClearTerrain: TSpeedButton
300
            Left = 33
301
            Height = 22
302
            Hint = 'Clear'
303
            Width = 23
304
            Color = clBtnFace
305
            Glyph.Data = {
306
              36040000424D3604000000000000360000002800000010000000100000000100
307
              2000000000000004000064000000640000000000000000000000000000000000
308
              0000000000000000000000000000000000000000000000000000000000000000
309
              0000000000000000000000000000000000000000000000000000000000000000
310
              000000000000000000000000F1FF0000F1FF0000F1FF0000F1FF0000EFFF0000
311
              EFFF0000EDFF0000EDFF00000000000000000000000000000000000000000000
312
              0000000000000000F5FF1A20F5FF3C4CF9FF3A49F8FF3847F8FF3545F8FF3443
313
              F7FF3242F7FF141BF1FF0000EDFF000000000000000000000000000000000000
314
              00000000F7FF1D23F9FF4453FAFF2429F9FF1212F7FF0F0FF6FF0C0CF5FF0909
315
              F5FF161BF5FF3343F7FF141BF1FF0000EDFF0000000000000000000000000000
316
              F9FF1F25FAFF4A58FBFF4247FBFFC9C9FDFF3B3BF9FF1313F7FF1010F6FF3333
317
              F7FFC5C5FDFF3035F7FF3444F7FF141BF2FF0000EDFF00000000000000000000
318
              FBFF4F5DFDFF3237FBFFCBCBFEFFF2F2FFFFEBEBFEFF3B3BF9FF3939F8FFEAEA
319
              FEFFF1F1FEFFC5C5FDFF181DF6FF3343F7FF0000EFFF00000000000000000000
320
              FDFF525FFDFF2828FCFF4747FCFFECECFFFFF2F2FFFFECECFFFFECECFEFFF1F1
321
              FFFFEAEAFEFF3434F7FF0B0BF5FF3545F8FF0000EFFF00000000000000000000
322
              FDFF5562FEFF2C2CFDFF2929FCFF4848FCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
323
              FEFF3A3AF9FF1212F7FF0F0FF6FF3848F8FF0000F1FF00000000000000000000
324
              FDFF5764FEFF3030FDFF2D2DFDFF4B4BFCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
325
              FFFF3D3DF9FF1616F8FF1313F7FF3C4BF8FF0000F1FF00000000000000000000
326
              FFFF5A67FEFF3333FEFF5050FDFFEDEDFFFFF3F3FFFFEDEDFFFFEDEDFFFFF2F2
327
              FFFFECECFEFF3E3EFAFF1717F8FF3F4EF9FF0000F1FF00000000000000000000
328
              FFFF5B68FFFF4347FEFFCFCFFFFFF3F3FFFFEDEDFFFF4C4CFCFF4A4AFCFFECEC
329
              FFFFF2F2FFFFCACAFEFF2A2FFAFF4251FAFF0000F3FF00000000000000000000
330
              FFFF262BFFFF5D6AFFFF585BFFFFCFCFFFFF5252FEFF2F2FFDFF2C2CFDFF4B4B
331
              FCFFCCCCFEFF484CFBFF4957FBFF1D23F9FF0000F5FF00000000000000000000
332
              00000000FFFF262BFFFF5D6AFFFF4347FFFF3434FEFF3232FEFF3030FDFF2D2D
333
              FDFF383CFCFF4F5DFCFF1F25FAFF0000F7FF0000000000000000000000000000
334
              0000000000000000FFFF262BFFFF5C69FFFF5B68FFFF5A67FEFF5865FEFF5663
335
              FEFF5461FEFF2227FCFF0000FBFF000000000000000000000000000000000000
336
              000000000000000000000000FFFF0000FFFF0000FFFF0000FFFF0000FDFF0000
337
              FDFF0000FDFF0000FDFF00000000000000000000000000000000000000000000
338
              0000000000000000000000000000000000000000000000000000000000000000
339
              0000000000000000000000000000000000000000000000000000
340
            }
341
            NumGlyphs = 0
342
            OnClick = btnClearTerrainClick
343
            ShowHint = True
344
            ParentFont = True
345
            ParentShowHint = False
346
          end
347
          object btnDeleteTerrain: TSpeedButton
348
            Left = 6
349
            Height = 22
350
            Hint = 'Delete'
351
            Width = 23
352
            Color = clBtnFace
353
            Glyph.Data = {
354
              36040000424D3604000000000000360000002800000010000000100000000100
355
              2000000000000004000064000000640000000000000000000000000000000000
356
              0000000000000000000000000000000000000000000000000000000000000000
357
              0000000000000000000000000000000000000000000000000000000000000000
358
              0000000000000000000000000000000000003853BEFF3551BDFF304BBCFF2E4E
359
              B8FF000000000000000000000000000000000000000000000000000000000000
360
              000000000000000000004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
361
              E4FF334DC1FF2B4AB7FF00000000000000000000000000000000000000000000
362
              0000000000004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
363
              EEFF9EA0F4FF515DD7FF2B4AB7FF000000000000000000000000000000000000
364
              00005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
365
              E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FF0000000000000000000000000000
366
              00004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
367
              E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF0000000000000000000000005C62
368
              D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
369
              E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF00000000000000005F63
370
              DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
371
              FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF00000000000000006469
372
              DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
373
              FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF0000000000000000676A
374
              DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
375
              ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF00000000000000000000
376
              00007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
377
              F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF0000000000000000000000000000
378
              00006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
379
              F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF0000000000000000000000000000
380
              0000000000006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
381
              FBFFBAC7FCFF707BE9FF4C5BCCFF000000000000000000000000000000000000
382
              000000000000000000006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
383
              F4FF6670E2FF535ED1FF00000000000000000000000000000000000000000000
384
              000000000000000000000000000000000000686ADDFF6364DCFF6164DAFF5D63
385
              D9FF000000000000000000000000000000000000000000000000000000000000
386
              0000000000000000000000000000000000000000000000000000000000000000
387
              0000000000000000000000000000000000000000000000000000
388
            }
389
            NumGlyphs = 0
390
            OnClick = btnDeleteTerrainClick
391
            ShowHint = True
392
            ParentFont = True
393
            ParentShowHint = False
394
          end
395
        end
396
      end
397
    end
398
    object pgDeleteStatics: TPage
399
      Caption = 'Delete statics'
400
      ClientWidth = 464
401
      ClientHeight = 360
402
      ParentFont = True
403
      object gbDeleteStaticsTiles: TGroupBox
404
        Left = 8
405
        Height = 344
406
        Top = 8
407
        Width = 225
408
        Align = alLeft
409
        BorderSpacing.Around = 8
410
        Caption = 'Tiles'
411
        ClientHeight = 329
412
        ClientWidth = 221
413
        ParentFont = True
414
        TabOrder = 0
415
        object lblDeleteStaticsTilesDesc: TLabel
416
          Left = 4
417
          Height = 78
418
          Width = 213
419
          Align = alTop
420
          BorderSpacing.Left = 4
421
          BorderSpacing.Right = 4
422
          BorderSpacing.Bottom = 4
423
          Caption = 'Drag statics tiles from the main window and drop them on the list. Only statics matching these tiles will be deleted. If the list is empty, every static will be deleted.'
424
          ParentColor = False
425
          ParentFont = True
426
          WordWrap = True
427
        end
428
        object vdtDeleteStaticsTiles: TVirtualDrawTree
429
          Tag = 1
430
          Cursor = 63
431
          Left = 4
432
          Height = 217
433
          Top = 82
434
          Width = 213
435
          Align = alClient
436
          BorderSpacing.Left = 4
437
          BorderSpacing.Right = 4
438
          BorderSpacing.Bottom = 4
439
          DefaultNodeHeight = 44
440
          DragMode = dmAutomatic
441
          DragType = dtVCL
442
          Header.Options = [hoColumnResize, hoDrag, hoVisible]
443
          Header.ParentFont = True
444
          Header.Style = hsFlatButtons
445
          ParentFont = True
446
          TabOrder = 0
447
          TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning, toFullRowDrag]
448
          TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
449
          TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect]
450
          OnDragOver = vdtTerrainTilesDragOver
451
          OnDragDrop = vdtTerrainTilesDragDrop
452
          OnDrawNode = vdtTerrainTilesDrawNode
453
          Columns = <          
454
            item
455
              WideText = 'ID'
456
            end          
457
            item
458
              Position = 1
459
              Width = 44
460
              WideText = 'Tile'
461
            end          
462
            item
463
              Position = 2
464
              Width = 100
465
              WideText = 'Name'
466
            end>
467
        end
468
        object pnlDrawTerrainTilesControls2: TPanel
469
          Height = 26
470
          Top = 303
471
          Width = 221
472
          Align = alBottom
473
          BevelOuter = bvNone
474
          ClientHeight = 26
475
          ClientWidth = 221
476
          ParentFont = True
477
          TabOrder = 1
478
          object btnClearDStaticsTiles: TSpeedButton
479
            Left = 33
480
            Height = 22
481
            Hint = 'Clear'
482
            Width = 23
483
            Color = clBtnFace
484
            Glyph.Data = {
485
              36040000424D3604000000000000360000002800000010000000100000000100
486
              2000000000000004000064000000640000000000000000000000000000000000
487
              0000000000000000000000000000000000000000000000000000000000000000
488
              0000000000000000000000000000000000000000000000000000000000000000
489
              000000000000000000000000F1FF0000F1FF0000F1FF0000F1FF0000EFFF0000
490
              EFFF0000EDFF0000EDFF00000000000000000000000000000000000000000000
491
              0000000000000000F5FF1A20F5FF3C4CF9FF3A49F8FF3847F8FF3545F8FF3443
492
              F7FF3242F7FF141BF1FF0000EDFF000000000000000000000000000000000000
493
              00000000F7FF1D23F9FF4453FAFF2429F9FF1212F7FF0F0FF6FF0C0CF5FF0909
494
              F5FF161BF5FF3343F7FF141BF1FF0000EDFF0000000000000000000000000000
495
              F9FF1F25FAFF4A58FBFF4247FBFFC9C9FDFF3B3BF9FF1313F7FF1010F6FF3333
496
              F7FFC5C5FDFF3035F7FF3444F7FF141BF2FF0000EDFF00000000000000000000
497
              FBFF4F5DFDFF3237FBFFCBCBFEFFF2F2FFFFEBEBFEFF3B3BF9FF3939F8FFEAEA
498
              FEFFF1F1FEFFC5C5FDFF181DF6FF3343F7FF0000EFFF00000000000000000000
499
              FDFF525FFDFF2828FCFF4747FCFFECECFFFFF2F2FFFFECECFFFFECECFEFFF1F1
500
              FFFFEAEAFEFF3434F7FF0B0BF5FF3545F8FF0000EFFF00000000000000000000
501
              FDFF5562FEFF2C2CFDFF2929FCFF4848FCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
502
              FEFF3A3AF9FF1212F7FF0F0FF6FF3848F8FF0000F1FF00000000000000000000
503
              FDFF5764FEFF3030FDFF2D2DFDFF4B4BFCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
504
              FFFF3D3DF9FF1616F8FF1313F7FF3C4BF8FF0000F1FF00000000000000000000
505
              FFFF5A67FEFF3333FEFF5050FDFFEDEDFFFFF3F3FFFFEDEDFFFFEDEDFFFFF2F2
506
              FFFFECECFEFF3E3EFAFF1717F8FF3F4EF9FF0000F1FF00000000000000000000
507
              FFFF5B68FFFF4347FEFFCFCFFFFFF3F3FFFFEDEDFFFF4C4CFCFF4A4AFCFFECEC
508
              FFFFF2F2FFFFCACAFEFF2A2FFAFF4251FAFF0000F3FF00000000000000000000
509
              FFFF262BFFFF5D6AFFFF585BFFFFCFCFFFFF5252FEFF2F2FFDFF2C2CFDFF4B4B
510
              FCFFCCCCFEFF484CFBFF4957FBFF1D23F9FF0000F5FF00000000000000000000
511
              00000000FFFF262BFFFF5D6AFFFF4347FFFF3434FEFF3232FEFF3030FDFF2D2D
512
              FDFF383CFCFF4F5DFCFF1F25FAFF0000F7FF0000000000000000000000000000
513
              0000000000000000FFFF262BFFFF5C69FFFF5B68FFFF5A67FEFF5865FEFF5663
514
              FEFF5461FEFF2227FCFF0000FBFF000000000000000000000000000000000000
515
              000000000000000000000000FFFF0000FFFF0000FFFF0000FFFF0000FDFF0000
516
              FDFF0000FDFF0000FDFF00000000000000000000000000000000000000000000
517
              0000000000000000000000000000000000000000000000000000000000000000
518
              0000000000000000000000000000000000000000000000000000
519
            }
520
            NumGlyphs = 0
521
            OnClick = btnClearDStaticsTilesClick
522
            ShowHint = True
523
            ParentFont = True
524
            ParentShowHint = False
525
          end
526
          object btnDeleteDStaticsTiles: TSpeedButton
527
            Left = 6
528
            Height = 22
529
            Hint = 'Delete'
530
            Width = 23
531
            Color = clBtnFace
532
            Glyph.Data = {
533
              36040000424D3604000000000000360000002800000010000000100000000100
534
              2000000000000004000064000000640000000000000000000000000000000000
535
              0000000000000000000000000000000000000000000000000000000000000000
536
              0000000000000000000000000000000000000000000000000000000000000000
537
              0000000000000000000000000000000000003853BEFF3551BDFF304BBCFF2E4E
538
              B8FF000000000000000000000000000000000000000000000000000000000000
539
              000000000000000000004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
540
              E4FF334DC1FF2B4AB7FF00000000000000000000000000000000000000000000
541
              0000000000004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
542
              EEFF9EA0F4FF515DD7FF2B4AB7FF000000000000000000000000000000000000
543
              00005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
544
              E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FF0000000000000000000000000000
545
              00004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
546
              E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF0000000000000000000000005C62
547
              D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
548
              E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF00000000000000005F63
549
              DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
550
              FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF00000000000000006469
551
              DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
552
              FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF0000000000000000676A
553
              DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
554
              ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF00000000000000000000
555
              00007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
556
              F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF0000000000000000000000000000
557
              00006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
558
              F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF0000000000000000000000000000
559
              0000000000006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
560
              FBFFBAC7FCFF707BE9FF4C5BCCFF000000000000000000000000000000000000
561
              000000000000000000006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
562
              F4FF6670E2FF535ED1FF00000000000000000000000000000000000000000000
563
              000000000000000000000000000000000000686ADDFF6364DCFF6164DAFF5D63
564
              D9FF000000000000000000000000000000000000000000000000000000000000
565
              0000000000000000000000000000000000000000000000000000000000000000
566
              0000000000000000000000000000000000000000000000000000
567
            }
568
            NumGlyphs = 0
569
            OnClick = btnDeleteDStaticsTilesClick
570
            ShowHint = True
571
            ParentFont = True
572
            ParentShowHint = False
573
          end
574
        end
575
      end
576
      object GroupBox1: TGroupBox
577
        Left = 244
578
        Height = 92
579
        Top = 8
580
        Width = 185
581
        Caption = 'Z Boundaries'
582
        ClientHeight = 77
583
        ClientWidth = 181
584
        ParentFont = True
585
        TabOrder = 1
586
        object Label7: TLabel
587
          Left = 4
588
          Height = 30
589
          Width = 173
590
          Align = alTop
591
          BorderSpacing.Left = 4
592
          BorderSpacing.Right = 4
593
          BorderSpacing.Bottom = 4
594
          Caption = 'Only statics within this Z range will be deleted.'
595
          ParentColor = False
596
          ParentFont = True
597
          WordWrap = True
598
        end
599
        object Label8: TLabel
600
          Left = 64
601
          Height = 14
602
          Top = 42
603
          Width = 12
604
          Caption = 'to'
605
          ParentColor = False
606
          ParentFont = True
607
        end
608
        object seDeleteStaticsZ1: TSpinEdit
609
          Left = 4
610
          Height = 23
611
          Top = 39
612
          Width = 50
613
          MaxValue = 127
614
          MinValue = -128
615
          ParentFont = True
616
          TabOrder = 0
617
          Value = -128
618
        end
619
        object seDeleteStaticsZ2: TSpinEdit
620
          Left = 86
621
          Height = 23
622
          Top = 39
623
          Width = 50
624
          MaxValue = 127
625
          MinValue = -128
626
          ParentFont = True
627
          TabOrder = 1
628
          Value = 127
629
        end
630
      end
631
    end
632
    object pgInsertStatics: TPage
633
      Caption = 'Insert statics'
634
      ClientWidth = 464
635
      ClientHeight = 335
636
      ParentFont = True
637
      object gbInserStaticsTiles: TGroupBox
638
        Left = 8
639
        Height = 319
640
        Top = 8
641
        Width = 225
642
        Align = alLeft
643
        BorderSpacing.Around = 8
644
        Caption = 'Tiles'
645
        ClientHeight = 315
646
        ClientWidth = 221
647
        ParentFont = True
648
        TabOrder = 0
649
        object lblInsertStaticsTiles: TLabel
650
          Left = 4
651
          Height = 58
652
          Width = 213
653
          Align = alTop
654
          BorderSpacing.Left = 4
655
          BorderSpacing.Right = 4
656
          BorderSpacing.Bottom = 4
657
          Caption = 'Drag statics tiles from the main window and drop them on the list. For each cell in the target area, one of these (random) will be used.'
658
          ParentColor = False
659
          ParentFont = True
660
          WordWrap = True
661
        end
662
        object vdtInsertStaticsTiles: TVirtualDrawTree
663
          Tag = 1
664
          Left = 4
665
          Height = 223
666
          Top = 62
667
          Width = 213
668
          Align = alClient
669
          BorderSpacing.Left = 4
670
          BorderSpacing.Right = 4
671
          BorderSpacing.Bottom = 4
672
          DefaultNodeHeight = 44
673
          DragMode = dmAutomatic
674
          DragType = dtVCL
675
          Header.Options = [hoColumnResize, hoDrag, hoVisible]
676
          Header.ParentFont = True
677
          Header.Style = hsFlatButtons
678
          ParentFont = True
679
          TabOrder = 0
680
          TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning, toFullRowDrag]
681
          TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
682
          TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect]
683
          OnDragOver = vdtTerrainTilesDragOver
684
          OnDragDrop = vdtTerrainTilesDragDrop
685
          OnDrawNode = vdtTerrainTilesDrawNode
686
          Columns = <          
687
            item
688
              WideText = 'ID'
689
            end          
690
            item
691
              Position = 1
692
              Width = 44
693
              WideText = 'Tile'
694
            end          
695
            item
696
              Position = 2
697
              Width = 100
698
              WideText = 'Name'
699
            end>
700
        end
701
        object pnlDrawTerrainTilesControls1: TPanel
702
          Height = 26
703
          Top = 289
704
          Width = 221
705
          Align = alBottom
706
          BevelOuter = bvNone
707
          ClientHeight = 26
708
          ClientWidth = 221
709
          ParentFont = True
710
          TabOrder = 1
711
          object btnClearIStaticsTiles: TSpeedButton
712
            Left = 33
713
            Height = 22
714
            Hint = 'Clear'
715
            Width = 23
716
            Color = clBtnFace
717
            Glyph.Data = {
718
              36040000424D3604000000000000360000002800000010000000100000000100
719
              2000000000000004000064000000640000000000000000000000000000000000
720
              0000000000000000000000000000000000000000000000000000000000000000
721
              0000000000000000000000000000000000000000000000000000000000000000
722
              000000000000000000000000F1FF0000F1FF0000F1FF0000F1FF0000EFFF0000
723
              EFFF0000EDFF0000EDFF00000000000000000000000000000000000000000000
724
              0000000000000000F5FF1A20F5FF3C4CF9FF3A49F8FF3847F8FF3545F8FF3443
725
              F7FF3242F7FF141BF1FF0000EDFF000000000000000000000000000000000000
726
              00000000F7FF1D23F9FF4453FAFF2429F9FF1212F7FF0F0FF6FF0C0CF5FF0909
727
              F5FF161BF5FF3343F7FF141BF1FF0000EDFF0000000000000000000000000000
728
              F9FF1F25FAFF4A58FBFF4247FBFFC9C9FDFF3B3BF9FF1313F7FF1010F6FF3333
729
              F7FFC5C5FDFF3035F7FF3444F7FF141BF2FF0000EDFF00000000000000000000
730
              FBFF4F5DFDFF3237FBFFCBCBFEFFF2F2FFFFEBEBFEFF3B3BF9FF3939F8FFEAEA
731
              FEFFF1F1FEFFC5C5FDFF181DF6FF3343F7FF0000EFFF00000000000000000000
732
              FDFF525FFDFF2828FCFF4747FCFFECECFFFFF2F2FFFFECECFFFFECECFEFFF1F1
733
              FFFFEAEAFEFF3434F7FF0B0BF5FF3545F8FF0000EFFF00000000000000000000
734
              FDFF5562FEFF2C2CFDFF2929FCFF4848FCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
735
              FEFF3A3AF9FF1212F7FF0F0FF6FF3848F8FF0000F1FF00000000000000000000
736
              FDFF5764FEFF3030FDFF2D2DFDFF4B4BFCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
737
              FFFF3D3DF9FF1616F8FF1313F7FF3C4BF8FF0000F1FF00000000000000000000
738
              FFFF5A67FEFF3333FEFF5050FDFFEDEDFFFFF3F3FFFFEDEDFFFFEDEDFFFFF2F2
739
              FFFFECECFEFF3E3EFAFF1717F8FF3F4EF9FF0000F1FF00000000000000000000
740
              FFFF5B68FFFF4347FEFFCFCFFFFFF3F3FFFFEDEDFFFF4C4CFCFF4A4AFCFFECEC
741
              FFFFF2F2FFFFCACAFEFF2A2FFAFF4251FAFF0000F3FF00000000000000000000
742
              FFFF262BFFFF5D6AFFFF585BFFFFCFCFFFFF5252FEFF2F2FFDFF2C2CFDFF4B4B
743
              FCFFCCCCFEFF484CFBFF4957FBFF1D23F9FF0000F5FF00000000000000000000
744
              00000000FFFF262BFFFF5D6AFFFF4347FFFF3434FEFF3232FEFF3030FDFF2D2D
745
              FDFF383CFCFF4F5DFCFF1F25FAFF0000F7FF0000000000000000000000000000
746
              0000000000000000FFFF262BFFFF5C69FFFF5B68FFFF5A67FEFF5865FEFF5663
747
              FEFF5461FEFF2227FCFF0000FBFF000000000000000000000000000000000000
748
              000000000000000000000000FFFF0000FFFF0000FFFF0000FFFF0000FDFF0000
749
              FDFF0000FDFF0000FDFF00000000000000000000000000000000000000000000
750
              0000000000000000000000000000000000000000000000000000000000000000
751
              0000000000000000000000000000000000000000000000000000
752
            }
753
            NumGlyphs = 0
754
            OnClick = btnClearIStaticsTilesClick
755
            ShowHint = True
756
            ParentFont = True
757
            ParentShowHint = False
758
          end
759
          object btnDeleteIStaticsTiles: TSpeedButton
760
            Left = 6
761
            Height = 22
762
            Hint = 'Delete'
763
            Width = 23
764
            Color = clBtnFace
765
            Glyph.Data = {
766
              36040000424D3604000000000000360000002800000010000000100000000100
767
              2000000000000004000064000000640000000000000000000000000000000000
768
              0000000000000000000000000000000000000000000000000000000000000000
769
              0000000000000000000000000000000000000000000000000000000000000000
770
              0000000000000000000000000000000000003853BEFF3551BDFF304BBCFF2E4E
771
              B8FF000000000000000000000000000000000000000000000000000000000000
772
              000000000000000000004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
773
              E4FF334DC1FF2B4AB7FF00000000000000000000000000000000000000000000
774
              0000000000004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
775
              EEFF9EA0F4FF515DD7FF2B4AB7FF000000000000000000000000000000000000
776
              00005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
777
              E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FF0000000000000000000000000000
778
              00004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
779
              E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF0000000000000000000000005C62
780
              D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
781
              E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF00000000000000005F63
782
              DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
783
              FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF00000000000000006469
784
              DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
785
              FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF0000000000000000676A
786
              DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
787
              ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF00000000000000000000
788
              00007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
789
              F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF0000000000000000000000000000
790
              00006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
791
              F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF0000000000000000000000000000
792
              0000000000006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
793
              FBFFBAC7FCFF707BE9FF4C5BCCFF000000000000000000000000000000000000
794
              000000000000000000006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
795
              F4FF6670E2FF535ED1FF00000000000000000000000000000000000000000000
796
              000000000000000000000000000000000000686ADDFF6364DCFF6164DAFF5D63
797
              D9FF000000000000000000000000000000000000000000000000000000000000
798
              0000000000000000000000000000000000000000000000000000000000000000
799
              0000000000000000000000000000000000000000000000000000
800
            }
801
            NumGlyphs = 0
802
            OnClick = btnDeleteIStaticsTilesClick
803
            ShowHint = True
804
            ParentFont = True
805
            ParentShowHint = False
806
          end
807
        end
808
      end
809
      object gbStaticsProbability: TGroupBox
810
        Left = 244
811
        Height = 84
812
        Top = 8
813
        Width = 185
814
        Caption = 'Probability'
815
        ClientHeight = 67
816
        ClientWidth = 181
817
        ParentFont = True
818
        TabOrder = 1
819
        object Label5: TLabel
820
          Left = 4
821
          Height = 28
822
          Width = 173
823
          Align = alTop
824
          BorderSpacing.Left = 4
825
          BorderSpacing.Right = 4
826
          BorderSpacing.Bottom = 4
827
          Caption = 'A tile will only be placed with this probability:'
828
          ParentColor = False
829
          ParentFont = True
830
          WordWrap = True
831
        end
832
        object Label6: TLabel
833
          Left = 59
834
          Height = 13
835
          Top = 40
836
          Width = 11
837
          Caption = '%'
838
          ParentColor = False
839
          ParentFont = True
840
        end
841
        object seStaticsProbability: TSpinEdit
842
          Left = 4
843
          Height = 23
844
          Top = 36
845
          Width = 50
846
          ParentFont = True
847
          TabOrder = 0
848
          Value = 100
849
        end
850
      end
851
      object gbStaticsPlacement: TGroupBox
852
        Left = 244
853
        Height = 120
854
        Top = 100
855
        Width = 185
856
        Caption = 'Z Placement'
857
        ClientHeight = 103
858
        ClientWidth = 181
859
        ParentFont = True
860
        TabOrder = 2
861
        object rbPlaceStaticsOnTerrain: TRadioButton
862
          Left = 4
863
          Height = 20
864
          Top = 3
865
          Width = 140
866
          Caption = 'Place tiles on terrain'
867
          Checked = True
868
          ParentFont = True
869
          State = cbChecked
870
          TabOrder = 0
871
        end
872
        object rbPlaceStaticsOnTop: TRadioButton
873
          Left = 4
874
          Height = 20
875
          Top = 27
876
          Width = 120
877
          Caption = 'Place tiles on top'
878
          ParentFont = True
879
          TabOrder = 1
880
        end
881
        object rbPlaceStaticsOnZ: TRadioButton
882
          Left = 4
883
          Height = 20
884
          Top = 51
885
          Width = 103
886
          Caption = 'Place tiles on:'
887
          ParentFont = True
888
          TabOrder = 2
889
        end
890
        object seInsertStaticsZ: TSpinEdit
891
          Left = 24
892
          Height = 23
893
          Top = 75
894
          Width = 50
895
          ParentFont = True
896
          TabOrder = 3
897
        end
898
      end
899
    end
900
  end
901
  object pnlLeft: TPanel
902
    Height = 364
903
    Width = 152
904
    Align = alLeft
905
    BevelOuter = bvNone
906
    ClientHeight = 364
907
    ClientWidth = 152
908
    ParentFont = True
909
    TabOrder = 1
910
    object Label1: TLabel
911
      Left = 4
912
      Height = 13
913
      Top = 136
914
      Width = 144
915
      Align = alTop
916
      BorderSpacing.Left = 4
917
      BorderSpacing.Right = 4
918
      Caption = 'Area:'
919
      ParentColor = False
920
      ParentFont = True
921
    end
922
    object vstActions: TVirtualStringTree
923
      Height = 136
924
      Width = 152
925
      Align = alTop
926
      Header.Options = [hoAutoResize, hoVisible]
927
      Header.ParentFont = True
928
      Header.Style = hsFlatButtons
929
      ParentFont = True
930
      TabOrder = 0
931
      TreeOptions.MiscOptions = [toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
932
      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
933
      TreeOptions.SelectionOptions = [toFullRowSelect]
934
      OnChange = vstActionsChange
935
      OnGetText = vstActionsGetText
936
      OnPaintText = vstActionsPaintText
937
      Columns = <      
938
        item
939
          Width = 152
940
          WideText = 'Actions'
941
        end>
942
    end
943
    object pnlAreaControls: TPanel
944
      Left = 4
945
      Height = 82
946
      Top = 278
947
      Width = 144
948
      Align = alBottom
949
      BorderSpacing.Around = 4
950
      BevelOuter = bvNone
951
      ClientHeight = 82
952
      ClientWidth = 144
953
      ParentFont = True
954
      TabOrder = 1
955
      object lblX: TLabel
956
        Left = 4
957
        Height = 13
958
        Top = 34
959
        Width = 8
960
        Caption = 'X'
961
        Enabled = False
962
        ParentColor = False
963
        ParentFont = True
964
      end
965
      object lblY: TLabel
966
        Left = 4
967
        Height = 13
968
        Top = 62
969
        Width = 8
970
        Caption = 'Y'
971
        Enabled = False
972
        ParentColor = False
973
        ParentFont = True
974
      end
975
      object btnAddArea: TSpeedButton
976
        Left = 30
977
        Height = 22
978
        Hint = 'Add area'
979
        Width = 23
980
        Color = clBtnFace
981
        Glyph.Data = {
982
          36040000424D3604000000000000360000002800000010000000100000000100
983
          2000000000000004000064000000640000000000000000000000000000000000
984
          0000000000000000000000000000000000000000000000000000000000000000
985
          0000000000000000000000000000000000000000000000000000000000000000
986
          0000000000000000000000000000000000003A8C44FF368940FF32873CFF2F84
987
          37FF000000000000000000000000000000000000000000000000000000000000
988
          00000000000000000000459653FF419950FF7DC28FFF96D0A6FF96CFA6FF78BE
989
          89FF368D42FF2C8134FF00000000000000000000000000000000000000000000
990
          0000000000004D9C5DFF64B478FFA8DBB5FF87CC98FF66BC7DFF64BA7CFF86CB
991
          98FFA5D9B4FF58AA6BFF2C8134FF000000000000000000000000000000000000
992
          000056A366FF6AB97DFFA8DBB2FF60BC77FF5CBA73FF59B870FF59B56FFF58B5
993
          6FFF5BB774FFA5D9B3FF5AAA6CFF2C8234FF0000000000000000000000000000
994
          000053AB68FFAADDB4FF64C179FF5FBE71FF60BC77FFFFFFFFFFFFFFFFFF59B8
995
          70FF58B56EFF5CB774FFA6DAB4FF388F43FF00000000000000000000000061AC
996
          75FF8ACC98FF89D396FF6BC67AFF63C170FF55AB65FFFFFFFFFFFFFFFFFF59B8
997
          70FF59B870FF5BB972FF85CC97FF7BBE8DFF308539FF000000000000000065AF
998
          7AFFA9DDB3FF7DCF8AFF75CC81FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
999
          FFFFFFFFFFFF59B870FF67BE7DFF9CD4ABFF34883DFF000000000000000069B2
1000
          7EFFB6E2BEFF8BD597FF7AC986FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
1001
          FFFFFFFFFFFF59B870FF69C17EFF9DD4AAFF388B42FF00000000000000006DB5
1002
          83FFACDDB6FFA6DFAFFF81CB8CFF7CC986FF6EBD79FFFFFFFFFFFFFFFFFF5BAC
1003
          6AFF60BC77FF5CBA73FF8BD199FF80C592FF3C8E47FF00000000000000000000
1004
          000085C797FFD2EED7FF95D9A0FF8AD394FF7FC889FFFFFFFFFFFFFFFFFF79CD
1005
          85FF6BC37CFF6FC77EFFACDFB5FF459E57FF0000000000000000000000000000
1006
          000070B887FFAADAB7FFD8F1DCFF92D89DFF88CD93FF84CC8EFF8BD496FF8AD4
1007
          95FF83D28EFFAFE0B7FF6BB97DFF489856FF0000000000000000000000000000
1008
          00000000000070B887FFAFDCBBFFDCF2E0FFB6E4BDFF9BDBA5FF96D9A0FFA5DF
1009
          AFFFC0E8C5FF79C28AFF509E5FFF000000000000000000000000000000000000
1010
          0000000000000000000071B887FF94CEA4FFC3E6CBFFCFEBD4FFC9E9CEFFAFDD
1011
          B8FF6DB97FFF58A569FF00000000000000000000000000000000000000000000
1012
          0000000000000000000000000000000000006EB684FF6AB380FF67B17CFF63AE
1013
          77FF000000000000000000000000000000000000000000000000000000000000
1014
          0000000000000000000000000000000000000000000000000000000000000000
1015
          0000000000000000000000000000000000000000000000000000
1016
        }
1017
        NumGlyphs = 0
1018
        OnClick = btnAddAreaClick
1019
        ShowHint = True
1020
        ParentFont = True
1021
        ParentShowHint = False
1022
      end
1023
      object btnDeleteArea: TSpeedButton
1024
        Left = 59
1025
        Height = 22
1026
        Hint = 'Delete area'
1027
        Width = 23
1028
        Color = clBtnFace
1029
        Glyph.Data = {
1030
          36040000424D3604000000000000360000002800000010000000100000000100
1031
          2000000000000004000064000000640000000000000000000000000000000000
1032
          0000000000000000000000000000000000000000000000000000000000000000
1033
          0000000000000000000000000000000000000000000000000000000000000000
1034
          0000000000000000000000000000000000003853BEFF3551BDFF304BBCFF2E4E
1035
          B8FF000000000000000000000000000000000000000000000000000000000000
1036
          000000000000000000004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
1037
          E4FF334DC1FF2B4AB7FF00000000000000000000000000000000000000000000
1038
          0000000000004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
1039
          EEFF9EA0F4FF515DD7FF2B4AB7FF000000000000000000000000000000000000
1040
          00005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
1041
          E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FF0000000000000000000000000000
1042
          00004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
1043
          E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF0000000000000000000000005C62
1044
          D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
1045
          E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF00000000000000005F63
1046
          DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
1047
          FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF00000000000000006469
1048
          DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
1049
          FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF0000000000000000676A
1050
          DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
1051
          ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF00000000000000000000
1052
          00007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
1053
          F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF0000000000000000000000000000
1054
          00006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
1055
          F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF0000000000000000000000000000
1056
          0000000000006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
1057
          FBFFBAC7FCFF707BE9FF4C5BCCFF000000000000000000000000000000000000
1058
          000000000000000000006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
1059
          F4FF6670E2FF535ED1FF00000000000000000000000000000000000000000000
1060
          000000000000000000000000000000000000686ADDFF6364DCFF6164DAFF5D63
1061
          D9FF000000000000000000000000000000000000000000000000000000000000
1062
          0000000000000000000000000000000000000000000000000000000000000000
1063
          0000000000000000000000000000000000000000000000000000
1064
        }
1065
        NumGlyphs = 0
1066
        OnClick = btnDeleteAreaClick
1067
        ShowHint = True
1068
        ParentFont = True
1069
        ParentShowHint = False
1070
      end
1071
      object btnClearArea: TSpeedButton
1072
        Left = 87
1073
        Height = 22
1074
        Hint = 'Delete all areas'
1075
        Width = 23
1076
        Color = clBtnFace
1077
        Glyph.Data = {
1078
          36040000424D3604000000000000360000002800000010000000100000000100
1079
          2000000000000004000064000000640000000000000000000000000000000000
1080
          0000000000000000000000000000000000000000000000000000000000000000
1081
          0000000000000000000000000000000000000000000000000000000000000000
1082
          000000000000000000000000F1FF0000F1FF0000F1FF0000F1FF0000EFFF0000
1083
          EFFF0000EDFF0000EDFF00000000000000000000000000000000000000000000
1084
          0000000000000000F5FF1A20F5FF3C4CF9FF3A49F8FF3847F8FF3545F8FF3443
1085
          F7FF3242F7FF141BF1FF0000EDFF000000000000000000000000000000000000
1086
          00000000F7FF1D23F9FF4453FAFF2429F9FF1212F7FF0F0FF6FF0C0CF5FF0909
1087
          F5FF161BF5FF3343F7FF141BF1FF0000EDFF0000000000000000000000000000
1088
          F9FF1F25FAFF4A58FBFF4247FBFFC9C9FDFF3B3BF9FF1313F7FF1010F6FF3333
1089
          F7FFC5C5FDFF3035F7FF3444F7FF141BF2FF0000EDFF00000000000000000000
1090
          FBFF4F5DFDFF3237FBFFCBCBFEFFF2F2FFFFEBEBFEFF3B3BF9FF3939F8FFEAEA
1091
          FEFFF1F1FEFFC5C5FDFF181DF6FF3343F7FF0000EFFF00000000000000000000
1092
          FDFF525FFDFF2828FCFF4747FCFFECECFFFFF2F2FFFFECECFFFFECECFEFFF1F1
1093
          FFFFEAEAFEFF3434F7FF0B0BF5FF3545F8FF0000EFFF00000000000000000000
1094
          FDFF5562FEFF2C2CFDFF2929FCFF4848FCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
1095
          FEFF3A3AF9FF1212F7FF0F0FF6FF3848F8FF0000F1FF00000000000000000000
1096
          FDFF5764FEFF3030FDFF2D2DFDFF4B4BFCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
1097
          FFFF3D3DF9FF1616F8FF1313F7FF3C4BF8FF0000F1FF00000000000000000000
1098
          FFFF5A67FEFF3333FEFF5050FDFFEDEDFFFFF3F3FFFFEDEDFFFFEDEDFFFFF2F2
1099
          FFFFECECFEFF3E3EFAFF1717F8FF3F4EF9FF0000F1FF00000000000000000000
1100
          FFFF5B68FFFF4347FEFFCFCFFFFFF3F3FFFFEDEDFFFF4C4CFCFF4A4AFCFFECEC
1101
          FFFFF2F2FFFFCACAFEFF2A2FFAFF4251FAFF0000F3FF00000000000000000000
1102
          FFFF262BFFFF5D6AFFFF585BFFFFCFCFFFFF5252FEFF2F2FFDFF2C2CFDFF4B4B
1103
          FCFFCCCCFEFF484CFBFF4957FBFF1D23F9FF0000F5FF00000000000000000000
1104
          00000000FFFF262BFFFF5D6AFFFF4347FFFF3434FEFF3232FEFF3030FDFF2D2D
1105
          FDFF383CFCFF4F5DFCFF1F25FAFF0000F7FF0000000000000000000000000000
1106
          0000000000000000FFFF262BFFFF5C69FFFF5B68FFFF5A67FEFF5865FEFF5663
1107
          FEFF5461FEFF2227FCFF0000FBFF000000000000000000000000000000000000
1108
          000000000000000000000000FFFF0000FFFF0000FFFF0000FFFF0000FDFF0000
1109
          FDFF0000FDFF0000FDFF00000000000000000000000000000000000000000000
1110
          0000000000000000000000000000000000000000000000000000000000000000
1111
          0000000000000000000000000000000000000000000000000000
1112
        }
1113
        NumGlyphs = 0
1114
        OnClick = btnClearAreaClick
1115
        ShowHint = True
1116
        ParentFont = True
1117
        ParentShowHint = False
1118
      end
1119
      object seX1: TSpinEdit
1120
        Left = 20
1121
        Height = 23
1122
        Top = 29
1123
        Width = 50
1124
        Enabled = False
1125
        OnChange = seX1Change
1126
        ParentFont = True
1127
        TabOrder = 0
1128
      end
1129
      object seX2: TSpinEdit
1130
        Left = 84
1131
        Height = 23
1132
        Top = 29
1133
        Width = 50
1134
        Enabled = False
1135
        OnChange = seX1Change
1136
        ParentFont = True
1137
        TabOrder = 1
1138
      end
1139
      object seY1: TSpinEdit
1140
        Left = 20
1141
        Height = 23
1142
        Top = 56
1143
        Width = 50
1144
        Enabled = False
1145
        OnChange = seX1Change
1146
        ParentFont = True
1147
        TabOrder = 2
1148
      end
1149
      object seY2: TSpinEdit
1150
        Left = 84
1151
        Height = 23
1152
        Top = 56
1153
        Width = 50
1154
        Enabled = False
1155
        OnChange = seX1Change
1156
        ParentFont = True
1157
        TabOrder = 3
1158
      end
1159
    end
1160
    object vstArea: TVirtualStringTree
1161
      Left = 4
1162
      Height = 125
1163
      Top = 149
1164
      Width = 144
1165
      Align = alClient
1166
      BorderSpacing.Left = 4
1167
      BorderSpacing.Right = 4
1168
      BorderSpacing.Bottom = 4
1169
      BorderStyle = bsSingle
1170
      Header.MainColumn = -1
1171
      Header.Options = [hoColumnResize, hoDrag]
1172
      TabOrder = 2
1173
      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
1174
      TreeOptions.SelectionOptions = [toFullRowSelect]
1175
      OnChange = vstAreaChange
1176
      OnGetText = vstAreaGetText
1177
      Columns = <>
1178
    end
1179
  end
1180
  object pnlControls: TPanel
1181
    Left = 4
1182
    Height = 25
1183
    Top = 368
1184
    Width = 612
1185
    Align = alBottom
1186
    BorderSpacing.Around = 4
1187
    BevelOuter = bvNone
1188
    ClientHeight = 25
1189
    ClientWidth = 612
1190
    ParentFont = True
1191
    TabOrder = 2
1192
    object btnExecute: TButton
1193
      Left = 480
1194
      Height = 25
1195
      Width = 64
1196
      Align = alRight
1197
      BorderSpacing.Right = 4
1198
      BorderSpacing.InnerBorder = 4
1199
      Caption = 'Execute'
1200
      OnClick = btnExecuteClick
1201
      ParentFont = True
1202
      TabOrder = 0
1203
    end
1204
    object btnClose: TButton
1205
      Left = 548
1206
      Height = 25
1207
      Width = 64
1208
      Align = alRight
1209
      BorderSpacing.Left = 4
1210
      BorderSpacing.InnerBorder = 4
1211
      Caption = 'Close'
1212
      OnClick = btnCloseClick
1213
      ParentFont = True
1214
      TabOrder = 1
1215
    end
1216
  end
1217
end