270 lines
6.5 KiB
Plaintext
270 lines
6.5 KiB
Plaintext
inherited frmBoundaries: TfrmBoundaries
|
|
Left = 445
|
|
Height = 162
|
|
Top = 332
|
|
Width = 410
|
|
Caption = 'Boundaries'
|
|
ClientHeight = 162
|
|
ClientWidth = 410
|
|
OnCreate = FormCreate
|
|
object gbZRestriction: TGroupBox[0]
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
Left = 4
|
|
Height = 156
|
|
Top = 4
|
|
Width = 196
|
|
BorderSpacing.Left = 4
|
|
BorderSpacing.Top = 4
|
|
Caption = 'Restrict Height'
|
|
ClientHeight = 132
|
|
ClientWidth = 194
|
|
TabOrder = 0
|
|
object lblMinZ: TLabel
|
|
AnchorSideLeft.Control = tbMinZ
|
|
AnchorSideTop.Control = seMinZ
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 4
|
|
Height = 23
|
|
Top = 9
|
|
Width = 93
|
|
Caption = 'Minimum Z:'
|
|
Color = clDefault
|
|
Layout = tlCenter
|
|
ParentColor = False
|
|
end
|
|
object seMinZ: TSpinEdit
|
|
AnchorSideTop.Control = gbZRestriction
|
|
AnchorSideRight.Control = gbZRestriction
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 128
|
|
Height = 33
|
|
Top = 4
|
|
Width = 62
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 4
|
|
MaxValue = 127
|
|
MinValue = -128
|
|
OnChange = seMinZChange
|
|
TabOrder = 0
|
|
Value = -128
|
|
end
|
|
object tbMinZ: TTrackBar
|
|
AnchorSideLeft.Control = gbZRestriction
|
|
AnchorSideTop.Control = seMinZ
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbZRestriction
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 4
|
|
Height = 47
|
|
Top = 41
|
|
Width = 186
|
|
Frequency = 10
|
|
Max = 127
|
|
Min = -128
|
|
OnChange = tbMinZChange
|
|
PageSize = 1
|
|
Position = -128
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 4
|
|
TabOrder = 1
|
|
end
|
|
object lblMaxZ: TLabel
|
|
AnchorSideLeft.Control = tbMaxZ
|
|
AnchorSideTop.Control = seMaxZ
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 4
|
|
Height = 23
|
|
Top = 97
|
|
Width = 97
|
|
Caption = 'Maximum Z:'
|
|
Color = clDefault
|
|
Layout = tlCenter
|
|
ParentColor = False
|
|
end
|
|
object seMaxZ: TSpinEdit
|
|
AnchorSideTop.Control = tbMinZ
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = seMinZ
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 128
|
|
Height = 33
|
|
Top = 92
|
|
Width = 62
|
|
Anchors = [akTop, akRight]
|
|
MaxValue = 127
|
|
MinValue = -128
|
|
OnChange = seMaxZChange
|
|
TabOrder = 2
|
|
Value = 127
|
|
end
|
|
object tbMaxZ: TTrackBar
|
|
AnchorSideLeft.Control = gbZRestriction
|
|
AnchorSideTop.Control = seMaxZ
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbZRestriction
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 4
|
|
Height = 47
|
|
Top = 129
|
|
Width = 186
|
|
Frequency = 10
|
|
Max = 127
|
|
Min = -128
|
|
OnChange = tbMaxZChange
|
|
PageSize = 1
|
|
Position = 127
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 4
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object gbViewRestriction: TGroupBox[1]
|
|
AnchorSideLeft.Control = gbZRestriction
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 204
|
|
Height = 154
|
|
Top = 4
|
|
Width = 202
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 4
|
|
Caption = 'Restrict View Range'
|
|
ClientHeight = 130
|
|
ClientWidth = 200
|
|
TabOrder = 1
|
|
object seMinX: TSpinEdit
|
|
AnchorSideLeft.Control = lblX
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = seMaxX
|
|
Left = 22
|
|
Height = 33
|
|
Top = 4
|
|
Width = 74
|
|
BorderSpacing.Left = 4
|
|
OnChange = seMinXChange
|
|
TabOrder = 0
|
|
end
|
|
object seMaxX: TSpinEdit
|
|
AnchorSideTop.Control = gbViewRestriction
|
|
AnchorSideRight.Control = gbViewRestriction
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 122
|
|
Height = 33
|
|
Top = 4
|
|
Width = 74
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 4
|
|
OnChange = seMaxXChange
|
|
TabOrder = 1
|
|
end
|
|
object seMinY: TSpinEdit
|
|
AnchorSideLeft.Control = seMinX
|
|
AnchorSideTop.Control = seMinX
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = seMinX
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 22
|
|
Height = 33
|
|
Top = 45
|
|
Width = 74
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 8
|
|
OnChange = seMinYChange
|
|
TabOrder = 2
|
|
end
|
|
object seMaxY: TSpinEdit
|
|
AnchorSideLeft.Control = seMaxX
|
|
AnchorSideTop.Control = seMinY
|
|
AnchorSideRight.Control = seMaxX
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 122
|
|
Height = 33
|
|
Top = 45
|
|
Width = 74
|
|
Anchors = [akTop, akLeft, akRight]
|
|
OnChange = seMaxYChange
|
|
TabOrder = 3
|
|
end
|
|
object lblX: TLabel
|
|
AnchorSideLeft.Control = gbViewRestriction
|
|
AnchorSideTop.Control = seMinX
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 4
|
|
Height = 23
|
|
Top = 9
|
|
Width = 14
|
|
BorderSpacing.Left = 4
|
|
Caption = 'X:'
|
|
Color = clDefault
|
|
ParentColor = False
|
|
end
|
|
object lblY: TLabel
|
|
AnchorSideLeft.Control = lblX
|
|
AnchorSideTop.Control = seMinY
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 4
|
|
Height = 23
|
|
Top = 50
|
|
Width = 13
|
|
Caption = 'Y:'
|
|
Color = clDefault
|
|
ParentColor = False
|
|
end
|
|
object lblXSep: TLabel
|
|
AnchorSideLeft.Control = seMinX
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = seMaxX
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 100
|
|
Height = 23
|
|
Top = 9
|
|
Width = 17
|
|
BorderSpacing.Left = 4
|
|
Caption = '—'
|
|
Color = clDefault
|
|
ParentColor = False
|
|
end
|
|
object lblYSep: TLabel
|
|
AnchorSideLeft.Control = lblXSep
|
|
AnchorSideTop.Control = seMinY
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 100
|
|
Height = 23
|
|
Top = 50
|
|
Width = 17
|
|
Caption = '—'
|
|
Color = clDefault
|
|
ParentColor = False
|
|
end
|
|
object btnSelectArea: TButton
|
|
Left = 5
|
|
Height = 25
|
|
Top = 95
|
|
Width = 112
|
|
Caption = 'Select Area'
|
|
OnClick = btnSelectAreaClick
|
|
TabOrder = 4
|
|
end
|
|
object btnClear: TButton
|
|
Left = 122
|
|
Height = 25
|
|
Top = 95
|
|
Width = 75
|
|
Caption = 'Clear'
|
|
OnClick = btnClearClick
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
inherited tmClose: TTimer[2]
|
|
Left = 24
|
|
Top = 24
|
|
end
|
|
end
|