2015-05-01 12:14:15 +02:00
|
|
|
object frmFilter: TfrmFilter
|
2015-05-01 12:23:03 +02:00
|
|
|
Left = 1498
|
2015-05-01 12:14:15 +02:00
|
|
|
Height = 492
|
2015-05-01 12:23:03 +02:00
|
|
|
Top = 0
|
2015-05-01 12:14:15 +02:00
|
|
|
Width = 232
|
|
|
|
BorderIcons = [biSystemMenu, biMinimize]
|
|
|
|
BorderStyle = bsToolWindow
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Фильтр'
|
2015-05-01 12:14:15 +02:00
|
|
|
ClientHeight = 492
|
|
|
|
ClientWidth = 232
|
|
|
|
Font.Height = -11
|
2015-05-01 12:23:03 +02:00
|
|
|
KeyPreview = True
|
2015-05-01 12:14:15 +02:00
|
|
|
OnCreate = FormCreate
|
|
|
|
OnDestroy = FormDestroy
|
2015-05-01 12:23:03 +02:00
|
|
|
OnKeyDown = FormKeyDown
|
|
|
|
OnMouseDown = FormMouseDown
|
|
|
|
OnMouseUp = FormMouseUp
|
2015-05-01 12:14:15 +02:00
|
|
|
OnShow = FormShow
|
2015-05-01 12:23:03 +02:00
|
|
|
ShowInTaskBar = stNever
|
|
|
|
LCLVersion = '0.9.30.2'
|
2015-05-01 12:14:15 +02:00
|
|
|
object rgFilterType: TRadioGroup
|
|
|
|
Left = 4
|
|
|
|
Height = 40
|
|
|
|
Top = 4
|
|
|
|
Width = 224
|
|
|
|
Align = alTop
|
|
|
|
AutoFill = True
|
|
|
|
BorderSpacing.Around = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Правило фильтра'
|
2015-05-01 12:14:15 +02:00
|
|
|
ChildSizing.LeftRightSpacing = 6
|
|
|
|
ChildSizing.TopBottomSpacing = 6
|
|
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
|
|
ChildSizing.ControlsPerLine = 2
|
2015-05-01 12:23:03 +02:00
|
|
|
ClientHeight = 22
|
|
|
|
ClientWidth = 220
|
2015-05-01 12:14:15 +02:00
|
|
|
Columns = 2
|
|
|
|
ItemIndex = 0
|
|
|
|
Items.Strings = (
|
2015-05-01 12:23:03 +02:00
|
|
|
'Исключающий'
|
|
|
|
'Включающий'
|
2015-05-01 12:14:15 +02:00
|
|
|
)
|
|
|
|
OnClick = rgFilterTypeClick
|
2015-05-01 12:23:03 +02:00
|
|
|
OnKeyDown = FormKeyDown
|
|
|
|
OnMouseDown = FormMouseDown
|
|
|
|
OnMouseUp = FormMouseUp
|
2015-05-01 12:14:15 +02:00
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object GroupBox1: TGroupBox
|
|
|
|
Left = 4
|
|
|
|
Height = 259
|
|
|
|
Top = 48
|
|
|
|
Width = 224
|
|
|
|
Align = alClient
|
|
|
|
BorderSpacing.Around = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Фильтрация тайлов'
|
|
|
|
ClientHeight = 241
|
|
|
|
ClientWidth = 220
|
2015-05-01 12:14:15 +02:00
|
|
|
TabOrder = 1
|
2015-05-01 12:23:03 +02:00
|
|
|
OnMouseDown = FormMouseDown
|
|
|
|
OnMouseUp = FormMouseUp
|
2015-05-01 12:14:15 +02:00
|
|
|
object Label1: TLabel
|
2015-05-01 12:23:03 +02:00
|
|
|
AnchorSideLeft.Control = btnClear
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = btnClear
|
2015-05-01 12:14:15 +02:00
|
|
|
AnchorSideRight.Control = GroupBox1
|
|
|
|
AnchorSideRight.Side = asrBottom
|
2015-05-01 12:23:03 +02:00
|
|
|
Left = 56
|
|
|
|
Height = 25
|
|
|
|
Top = 215
|
|
|
|
Width = 164
|
2015-05-01 12:14:15 +02:00
|
|
|
Anchors = [akTop, akLeft, akRight]
|
2015-05-01 12:23:03 +02:00
|
|
|
BorderSpacing.Left = 4
|
|
|
|
Caption = 'Чтобы добавить тайлы - перетащите предметы в список из списка тайлов.'
|
|
|
|
Font.Height = -9
|
2015-05-01 12:14:15 +02:00
|
|
|
ParentColor = False
|
2015-05-01 12:23:03 +02:00
|
|
|
ParentFont = False
|
2015-05-01 12:14:15 +02:00
|
|
|
WordWrap = True
|
2015-05-01 12:23:03 +02:00
|
|
|
OnMouseDown = FormMouseDown
|
|
|
|
OnMouseUp = FormMouseUp
|
2015-05-01 12:14:15 +02:00
|
|
|
end
|
|
|
|
object btnClear: TSpeedButton
|
|
|
|
AnchorSideLeft.Control = btnDelete
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = GroupBox1
|
|
|
|
AnchorSideRight.Side = asrCenter
|
|
|
|
AnchorSideBottom.Control = btnDelete
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
|
|
|
Left = 30
|
|
|
|
Height = 22
|
2015-05-01 12:23:03 +02:00
|
|
|
Hint = 'Очистить список'
|
|
|
|
Top = 215
|
2015-05-01 12:14:15 +02:00
|
|
|
Width = 22
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
Glyph.Data = {
|
|
|
|
36040000424D3604000000000000360000002800000010000000100000000100
|
2015-05-01 12:23:03 +02:00
|
|
|
2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
|
|
|
|
640C00005D7300005DBA00005DCC00005DCC00005DCC00005DCC00005DCC0000
|
|
|
|
5DCC00005DCC00005DCC00005DBA00005D730000640CFFFFFF00FFFFFF000000
|
|
|
|
6D73080893DD1010CCF91111D9FF1111D9FF1111D9FF1111D9FF1111D9FF1111
|
|
|
|
D9FF1111D9FF1111D9FF0F0FCCF9070792DD00006D73FFFFFF00FFFFFF000000
|
|
|
|
7DBA1616CBF91111D1FF1111D1FF1111B6FF1111D1FF1111D1FF1111D1FF1111
|
|
|
|
D1FF1111B6FF1111D1FF1111D1FF0F0FC8F900007DBAFFFFFF00FFFFFF000000
|
|
|
|
84CC1C1CCEFF1111C8FF1111B2FFDCDCDCFF1111B2FF1111C8FF1111C8FF1111
|
|
|
|
B2FFEEEEEEFF1111B2FF1111C8FF1111C8FF000084CCFFFFFF00FFFFFF000000
|
|
|
|
89CC2222C8FF1111BEFFD1D1D1FFD6D6D6FFDCDCDCFF1111ADFF1111ADFFEAEA
|
|
|
|
EAFFEEEEEEFFEEEEEEFF1111BEFF1212BEFF000089CCFFFFFF00FFFFFF000000
|
|
|
|
8DCC3434C7FF1212B4FF1111B4FFD1D1D1FFD6D6D6FFDCDCDCFFE2E2E2FFE6E6
|
|
|
|
E6FFEAEAEAFF1111B4FF1111B4FF1414B6FF00008DCCFFFFFF00FFFFFF000000
|
|
|
|
92CC4646CEFF2626B5FF1414ABFF1111AAFFD1D1D1FFD6D6D6FFDCDCDCFFE2E2
|
|
|
|
E2FF1111AAFF1111AAFF1111AAFF1818B0FF000092CCFFFFFF00FFFFFF000000
|
|
|
|
96CC4A4AD2FF3333BBFF2E2EB8FF13139FFFCECECEFFD1D1D1FFD6D6D6FFDCDC
|
|
|
|
DCFF11119EFF1111A1FF1111A1FF1D1DACFF000096CCFFFFFF00FFFFFF000000
|
|
|
|
9ACC5050D8FF3737BFFF2323ABFFFFFFFFFFF7F7F7FFE8E8E8FFDEDEDEFFDBDB
|
|
|
|
DBFFDDDDDDFF11119BFF1616A0FF2B2BB5FF00009ACCFFFFFF00FFFFFF000000
|
|
|
|
9ECC5A5AE2FF4242CAFFFFFFFFFFFFFFFFFFFFFFFFFF4242CAFF4242CAFFFFFF
|
|
|
|
FFFFFFFFFFFFFFFFFFFF4242CAFF4E4ED6FF00009ECCFFFFFF00FFFFFF000000
|
|
|
|
A2CC6262EAFF4F4FD7FF4F4FD7FFFFFFFFFF4F4FD7FF4F4FD7FF4F4FD7FF4F4F
|
|
|
|
D7FFFFFFFFFF4F4FD7FF4F4FD7FF5A5AE2FF0000A2CCFFFFFF00FFFFFF000000
|
|
|
|
A5BA6060ECF95B5BE3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5B
|
|
|
|
E3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5BE7F90000A5BAFFFFFF00FFFFFF000000
|
|
|
|
A8732A2AC7DD6363EFF96D6DF5FF6D6DF5FF6D6DF5FF6D6DF5FF6D6DF5FF6D6D
|
|
|
|
F5FF6D6DF5FF6C6CF4FF6262EEF92929C5DD0000A873FFFFFF00FFFFFF000000
|
|
|
|
A90C0000AA730000AABA0000AACC0000AACC0000AACC0000AACC0000AACC0000
|
|
|
|
AACC0000AACC0000AACC0000AABA0000AA730000A90CFFFFFF00FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
|
2015-05-01 12:14:15 +02:00
|
|
|
}
|
|
|
|
NumGlyphs = 0
|
|
|
|
OnClick = btnClearClick
|
|
|
|
ShowHint = True
|
|
|
|
ParentShowHint = False
|
|
|
|
end
|
|
|
|
object btnDelete: TSpeedButton
|
|
|
|
AnchorSideLeft.Control = GroupBox1
|
|
|
|
AnchorSideBottom.Control = GroupBox1
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
|
|
|
Left = 4
|
|
|
|
Height = 22
|
2015-05-01 12:23:03 +02:00
|
|
|
Hint = 'Удалить выделенные'
|
|
|
|
Top = 215
|
2015-05-01 12:14:15 +02:00
|
|
|
Width = 22
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Around = 4
|
|
|
|
Glyph.Data = {
|
|
|
|
36040000424D3604000000000000360000002800000010000000100000000100
|
2015-05-01 12:23:03 +02:00
|
|
|
2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
|
|
|
|
640C00005D7300005DBA00005DCC00005DCC00005DCC00005DCC00005DCC0000
|
|
|
|
5DCC00005DCC00005DCC00005DBA00005D730000640CFFFFFF00FFFFFF000000
|
|
|
|
6D73080893DD1010CCF91111D9FF1111D9FF1111D9FF1111D9FF1111D9FF1111
|
|
|
|
D9FF1111D9FF1111D9FF0F0FCCF9070792DD00006D73FFFFFF00FFFFFF000000
|
|
|
|
7DBA1616CBF91111D1FF1111D1FF1111D1FF1111D1FF1111D1FF1111D1FF1111
|
|
|
|
D1FF1111D1FF1111D1FF1111D1FF0F0FC8F900007DBAFFFFFF00FFFFFF000000
|
|
|
|
84CC1C1CCEFF1111C8FF1111C8FF1111C8FF1111C8FF1111C8FF1111C8FF1111
|
|
|
|
C8FF1111C8FF1111C8FF1111C8FF1111C8FF000084CCFFFFFF00FFFFFF000000
|
|
|
|
89CC2222C8FF1111BEFF1111BEFF1111BEFF1111BEFF1111BEFF1111BEFF1111
|
|
|
|
BEFF1111BEFF1111BEFF1111BEFF1212BEFF000089CCFFFFFF00FFFFFF000000
|
|
|
|
8DCC3434C7FF1212B4FF1111A8FF1111A8FF1111A8FF1111A8FF1111A8FF1111
|
|
|
|
A8FF1111A8FF1111A8FF1111B4FF1414B6FF00008DCCFFFFFF00FFFFFF000000
|
|
|
|
92CC4646CEFF2626B5FFD0D0D0FFCCCCCCFFD1D1D1FFDCDCDCFFE8E8E8FFEEEE
|
|
|
|
EEFFEEEEEEFFEEEEEEFF1111AAFF1818B0FF000092CCFFFFFF00FFFFFF000000
|
|
|
|
96CC4A4AD2FF3333BBFFF8F8F8FFDEDEDEFFCECECEFFD1D1D1FFDCDCDCFFE8E8
|
|
|
|
E8FFEEEEEEFFEEEEEEFF1111A1FF1D1DACFF000096CCFFFFFF00FFFFFF000000
|
|
|
|
9ACC5050D8FF3737BFFF3737BFFF3737BFFF3232BAFF2727B0FF1C1CA6FF1616
|
|
|
|
A0FF12129CFF12129CFF1616A0FF2B2BB5FF00009ACCFFFFFF00FFFFFF000000
|
|
|
|
9ECC5A5AE2FF4242CAFF4242CAFF4242CAFF4242CAFF4242CAFF4242CAFF4242
|
|
|
|
CAFF4242CAFF4242CAFF4242CAFF4E4ED6FF00009ECCFFFFFF00FFFFFF000000
|
|
|
|
A2CC6262EAFF4F4FD7FF4F4FD7FF4F4FD7FF4F4FD7FF4F4FD7FF4F4FD7FF4F4F
|
|
|
|
D7FF4F4FD7FF4F4FD7FF4F4FD7FF5A5AE2FF0000A2CCFFFFFF00FFFFFF000000
|
|
|
|
A5BA6060ECF95B5BE3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5B
|
|
|
|
E3FF5B5BE3FF5B5BE3FF5B5BE3FF5B5BE7F90000A5BAFFFFFF00FFFFFF000000
|
|
|
|
A8732A2AC7DD6363EFF96D6DF5FF6D6DF5FF6D6DF5FF6D6DF5FF6D6DF5FF6D6D
|
|
|
|
F5FF6D6DF5FF6C6CF4FF6262EEF92929C5DD0000A873FFFFFF00FFFFFF000000
|
|
|
|
A90C0000AA730000AABA0000AACC0000AACC0000AACC0000AACC0000AACC0000
|
|
|
|
AACC0000AACC0000AACC0000AABA0000AA730000A90CFFFFFF00FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
|
|
|
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
|
2015-05-01 12:14:15 +02:00
|
|
|
}
|
|
|
|
NumGlyphs = 0
|
|
|
|
OnClick = btnDeleteClick
|
|
|
|
ShowHint = True
|
|
|
|
ParentShowHint = False
|
|
|
|
end
|
|
|
|
object vdtFilter: TVirtualDrawTree
|
2015-05-01 12:23:03 +02:00
|
|
|
Tag = -1
|
2015-05-01 12:14:15 +02:00
|
|
|
AnchorSideLeft.Control = GroupBox1
|
2015-05-01 12:23:03 +02:00
|
|
|
AnchorSideTop.Control = cbTileFilter
|
2015-05-01 12:14:15 +02:00
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = GroupBox1
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = btnDelete
|
|
|
|
Cursor = 63
|
|
|
|
Left = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Height = 184
|
|
|
|
Top = 27
|
|
|
|
Width = 212
|
2015-05-01 12:14:15 +02:00
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
|
|
BorderSpacing.Around = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Color = 16052980
|
2015-05-01 12:14:15 +02:00
|
|
|
DefaultNodeHeight = 44
|
|
|
|
DragType = dtVCL
|
|
|
|
Header.AutoSizeIndex = 0
|
|
|
|
Header.Columns = <
|
|
|
|
item
|
|
|
|
Position = 0
|
|
|
|
Text = 'ID'
|
2015-05-01 12:23:03 +02:00
|
|
|
Width = 40
|
2015-05-01 12:14:15 +02:00
|
|
|
end
|
|
|
|
item
|
|
|
|
Position = 1
|
2015-05-01 12:23:03 +02:00
|
|
|
Text = 'Тайл'
|
2015-05-01 12:14:15 +02:00
|
|
|
Width = 44
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Position = 2
|
2015-05-01 12:23:03 +02:00
|
|
|
Text = 'Название'
|
|
|
|
Width = 108
|
|
|
|
end
|
|
|
|
item
|
|
|
|
MaxWidth = 10
|
|
|
|
MinWidth = 0
|
|
|
|
Position = 3
|
|
|
|
Text = 'tile_separator'
|
|
|
|
Width = 8
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 4
|
|
|
|
Text = 'tile_S1'
|
|
|
|
Width = 46
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 5
|
|
|
|
Text = 'tile_S2'
|
|
|
|
Width = 46
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 6
|
|
|
|
Text = 'tile_S3'
|
|
|
|
Width = 46
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 7
|
|
|
|
Text = 'tile_S4'
|
|
|
|
Width = 46
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 8
|
|
|
|
Text = 'tile_M1'
|
|
|
|
Width = 62
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 9
|
|
|
|
Text = 'tile_M2'
|
|
|
|
Width = 62
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 10
|
|
|
|
Text = 'tile_M3'
|
|
|
|
Width = 62
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 11
|
|
|
|
Text = 'tile_L1'
|
|
|
|
Width = 93
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus]
|
|
|
|
Position = 12
|
|
|
|
Text = 'tile_L2'
|
|
|
|
Width = 93
|
|
|
|
end
|
|
|
|
item
|
|
|
|
MaxWidth = 10
|
|
|
|
MinWidth = 0
|
|
|
|
Position = 13
|
|
|
|
Text = 'tile_separator'
|
|
|
|
Width = 2
|
2015-05-01 12:14:15 +02:00
|
|
|
end>
|
|
|
|
Header.DefaultHeight = 17
|
2015-05-01 12:23:03 +02:00
|
|
|
Header.Options = [hoVisible]
|
2015-05-01 12:14:15 +02:00
|
|
|
Header.ParentFont = True
|
|
|
|
Header.Style = hsFlatButtons
|
2015-05-01 12:23:03 +02:00
|
|
|
ScrollBarOptions.AlwaysVisible = True
|
|
|
|
ScrollBarOptions.ScrollBars = ssVertical
|
2015-05-01 12:14:15 +02:00
|
|
|
TabOrder = 0
|
2015-05-01 12:23:03 +02:00
|
|
|
TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScroll, toAutoScrollOnExpand, toAutoTristateTracking, toAutoDeleteMovedNodes]
|
|
|
|
TreeOptions.MiscOptions = [toAcceptOLEDrop, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
|
|
|
|
TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages, toStaticBackground]
|
|
|
|
TreeOptions.SelectionOptions = [toFullRowSelect]
|
2015-05-01 12:14:15 +02:00
|
|
|
OnDragOver = vdtFilterDragOver
|
|
|
|
OnDragDrop = vdtFilterDragDrop
|
|
|
|
OnDrawNode = vdtFilterDrawNode
|
2015-05-01 12:23:03 +02:00
|
|
|
OnKeyDown = FormKeyDown
|
2015-05-01 12:14:15 +02:00
|
|
|
end
|
|
|
|
object cbTileFilter: TCheckBox
|
|
|
|
AnchorSideLeft.Control = GroupBox1
|
|
|
|
AnchorSideTop.Control = GroupBox1
|
|
|
|
Left = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Height = 19
|
2015-05-01 12:14:15 +02:00
|
|
|
Top = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Width = 166
|
2015-05-01 12:14:15 +02:00
|
|
|
BorderSpacing.Around = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Использовать фильтрацию'
|
2015-05-01 12:14:15 +02:00
|
|
|
OnChange = cbTileFilterChange
|
2015-05-01 12:23:03 +02:00
|
|
|
OnKeyDown = FormKeyDown
|
|
|
|
OnMouseDown = FormMouseDown
|
|
|
|
OnMouseUp = FormMouseUp
|
2015-05-01 12:14:15 +02:00
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object GroupBox2: TGroupBox
|
|
|
|
Left = 4
|
|
|
|
Height = 168
|
|
|
|
Top = 320
|
|
|
|
Width = 224
|
|
|
|
Align = alBottom
|
|
|
|
BorderSpacing.Around = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Фильтрация цветов'
|
|
|
|
ClientHeight = 150
|
|
|
|
ClientWidth = 220
|
2015-05-01 12:14:15 +02:00
|
|
|
TabOrder = 2
|
2015-05-01 12:23:03 +02:00
|
|
|
OnMouseDown = FormMouseDown
|
|
|
|
OnMouseUp = FormMouseUp
|
2015-05-01 12:14:15 +02:00
|
|
|
object cbHueFilter: TCheckBox
|
|
|
|
Left = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Height = 19
|
2015-05-01 12:14:15 +02:00
|
|
|
Top = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Width = 212
|
2015-05-01 12:14:15 +02:00
|
|
|
Align = alTop
|
|
|
|
BorderSpacing.Around = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Использовать фильтрацию'
|
2015-05-01 12:14:15 +02:00
|
|
|
OnChange = cbHueFilterChange
|
2015-05-01 12:23:03 +02:00
|
|
|
OnKeyDown = FormKeyDown
|
|
|
|
OnMouseDown = FormMouseDown
|
|
|
|
OnMouseUp = FormMouseUp
|
2015-05-01 12:14:15 +02:00
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object vdtHues: TVirtualDrawTree
|
|
|
|
Cursor = 63
|
|
|
|
Left = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Height = 119
|
|
|
|
Top = 27
|
|
|
|
Width = 212
|
2015-05-01 12:14:15 +02:00
|
|
|
Align = alClient
|
|
|
|
BorderSpacing.Around = 4
|
2015-05-01 12:23:03 +02:00
|
|
|
Color = 16052980
|
2015-05-01 12:14:15 +02:00
|
|
|
Header.AutoSizeIndex = 2
|
|
|
|
Header.Columns = <
|
|
|
|
item
|
|
|
|
Position = 0
|
|
|
|
Width = 20
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Position = 1
|
2015-05-01 12:23:03 +02:00
|
|
|
Text = 'Цвет'
|
2015-05-01 12:14:15 +02:00
|
|
|
Width = 38
|
|
|
|
end
|
|
|
|
item
|
|
|
|
Position = 2
|
2015-05-01 12:23:03 +02:00
|
|
|
Text = 'Название'
|
|
|
|
Width = 133
|
2015-05-01 12:14:15 +02:00
|
|
|
end>
|
|
|
|
Header.DefaultHeight = 17
|
|
|
|
Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoVisible]
|
|
|
|
Header.ParentFont = True
|
|
|
|
Header.Style = hsFlatButtons
|
|
|
|
PopupMenu = pmHues
|
2015-05-01 12:23:03 +02:00
|
|
|
ScrollBarOptions.AlwaysVisible = True
|
|
|
|
ScrollBarOptions.ScrollBars = ssVertical
|
2015-05-01 12:14:15 +02:00
|
|
|
TabOrder = 1
|
|
|
|
TreeOptions.MiscOptions = [toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
|
|
|
|
TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
|
|
|
|
TreeOptions.SelectionOptions = [toFullRowSelect]
|
|
|
|
OnChecked = vdtHuesChecked
|
|
|
|
OnDrawNode = vdtHuesDrawNode
|
2015-05-01 12:23:03 +02:00
|
|
|
OnKeyDown = FormKeyDown
|
2015-05-01 12:14:15 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
object Splitter1: TSplitter
|
|
|
|
Cursor = crVSplit
|
|
|
|
Left = 0
|
|
|
|
Height = 5
|
|
|
|
Top = 311
|
|
|
|
Width = 232
|
|
|
|
Align = alBottom
|
|
|
|
ResizeAnchor = akBottom
|
|
|
|
end
|
|
|
|
object pmHues: TPopupMenu
|
|
|
|
left = 148
|
|
|
|
top = 404
|
|
|
|
object mnuCheckHues: TMenuItem
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Отметить все цвета'
|
2015-05-01 12:14:15 +02:00
|
|
|
OnClick = mnuCheckHuesClick
|
|
|
|
end
|
|
|
|
object mnuUncheckHues: TMenuItem
|
2015-05-01 12:23:03 +02:00
|
|
|
Caption = 'Удалить все цвета'
|
2015-05-01 12:14:15 +02:00
|
|
|
OnClick = mnuUncheckHuesClick
|
|
|
|
end
|
|
|
|
end
|
2015-05-01 12:23:03 +02:00
|
|
|
object tFormClose: TTimer
|
|
|
|
Interval = 10
|
|
|
|
OnTimer = tFormCloseTimer
|
|
|
|
left = 192
|
|
|
|
top = 56
|
|
|
|
end
|
2015-05-01 12:14:15 +02:00
|
|
|
end
|