object fmDevEditor: TfmDevEditor
Left = 324
Height = 307
Top = 134
Width = 281
BorderStyle = bsDialog
BorderWidth = 4
Caption = 'Типы устройств'
ClientHeight = 307
ClientWidth = 281
OnShow = FormShow
Position = poOwnerFormCenter
LCLVersion = '1.6.2.0'
object plButtonContainer: TPanel
Left = 4
Height = 25
Top = 278
Width = 273
Align = alBottom
AutoSize = True
BorderSpacing.Top = 4
BevelOuter = bvNone
ChildSizing.HorizontalSpacing = 4
ClientHeight = 25
ClientWidth = 273
TabOrder = 1
object btCancel: TButton
Left = 198
Height = 25
Top = 0
Width = 75
Align = alRight
Cancel = True
Caption = 'Отмена'
ModalResult = 2
TabOrder = 1
end
object btOk: TButton
Left = 119
Height = 25
Top = 0
Width = 75
Align = alRight
Caption = 'OK'
Default = True
ModalResult = 1
TabOrder = 0
end
end
object plContents: TPanel
Left = 4
Height = 270
Top = 4
Width = 273
Align = alClient
AutoSize = True
BevelOuter = bvNone
BorderWidth = 4
ClientHeight = 270
ClientWidth = 273
TabOrder = 0
object lbNewDevice: TLabel
AnchorSideLeft.Control = dgDevices
AnchorSideTop.Control = plContents
Left = 4
Height = 15
Top = 4
Width = 145
BorderSpacing.Bottom = 4
Caption = 'Новый тип оборудования:'
ParentColor = False
end
object btAddDevice: TButton
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = plContents
AnchorSideRight.Side = asrBottom
Left = 194
Height = 25
Top = 22
Width = 75
Anchors = [akTop, akRight]
BorderSpacing.Bottom = 8
Caption = 'Добавить'
Enabled = False
OnClick = btAddDeviceClick
TabOrder = 1
end
object btDeleteDevice: TButton
AnchorSideTop.Control = btAddDevice
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = plContents
AnchorSideRight.Side = asrBottom
Left = 194
Height = 25
Top = 55
Width = 75
Anchors = [akTop, akRight]
BorderSpacing.Bottom = 8
Caption = 'Удалить'
OnClick = btDeleteDeviceClick
TabOrder = 2
end
object dgDevices: TDBGrid
AnchorSideLeft.Control = plContents
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = plContents
AnchorSideBottom.Side = asrBottom
Left = 4
Height = 212
Top = 54
Width = 182
Anchors = [akTop, akRight]
AutoEdit = False
AutoFillColumns = True
Color = clWindow
Columns = <
item
Title.Caption = 'Устройство'
Width = 161
FieldName = 'DEVICE'
end>
DataSource = dmOrder.dsDevice
FixedCols = 0
Options = [dgColumnResize, dgColumnMove, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgTruncCellHints]
Scrollbars = ssVertical
TabOrder = 3
end
object edNewDevice: TEdit
AnchorSideLeft.Control = plContents
AnchorSideTop.Control = lbNewDevice
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = btAddDevice
Left = 4
Height = 23
Top = 23
Width = 182
Anchors = [akTop, akRight]
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
MaxLength = 50
OnChange = edNewDeviceChange
OnKeyDown = edNewDeviceKeyDown
TabOrder = 0
end
end
end