home *** CD-ROM | disk | FTP | other *** search
- object fmGetFields: TfmGetFields
- Left = 383
- Top = 260
- ActiveControl = lbSelFields
- BorderIcons = [biSystemMenu]
- BorderStyle = bsToolWindow
- Caption = 'FieldsEditorForm'
- ClientHeight = 236
- ClientWidth = 306
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 137
- Height = 205
- Align = alLeft
- BevelOuter = bvNone
- BorderWidth = 5
- TabOrder = 0
- object lbAvFields: TListBox
- Left = 5
- Top = 25
- Width = 127
- Height = 175
- Align = alClient
- DragMode = dmAutomatic
- ItemHeight = 13
- MultiSelect = True
- TabOrder = 0
- OnDblClick = lbAvFieldsDblClick
- OnDragDrop = lbFieldsDragDrop
- OnDragOver = lbFieldsDragOver
- end
- object Panel5: TPanel
- Left = 5
- Top = 5
- Width = 127
- Height = 20
- Align = alTop
- BevelOuter = bvNone
- Caption = 'Available fields'
- TabOrder = 1
- end
- end
- object Panel3: TPanel
- Left = 137
- Top = 0
- Width = 32
- Height = 205
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 1
- object SpeedButton1: TSpeedButton
- Left = 4
- Top = 29
- Width = 25
- Height = 25
- Caption = '>'
- Font.Charset = RUSSIAN_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- OnClick = SpeedButton1Click
- end
- object SpeedButton2: TSpeedButton
- Left = 4
- Top = 61
- Width = 25
- Height = 25
- Caption = '>>'
- Font.Charset = RUSSIAN_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- OnClick = SpeedButton2Click
- end
- object SpeedButton3: TSpeedButton
- Left = 4
- Top = 93
- Width = 25
- Height = 25
- Caption = '<'
- Font.Charset = RUSSIAN_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- OnClick = SpeedButton3Click
- end
- object SpeedButton4: TSpeedButton
- Left = 4
- Top = 125
- Width = 25
- Height = 25
- Caption = '<<'
- Font.Charset = RUSSIAN_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- OnClick = SpeedButton4Click
- end
- end
- object Panel2: TPanel
- Left = 169
- Top = 0
- Width = 137
- Height = 205
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 5
- TabOrder = 2
- object lbSelFields: TListBox
- Left = 5
- Top = 25
- Width = 127
- Height = 175
- Align = alClient
- DragMode = dmAutomatic
- ItemHeight = 13
- MultiSelect = True
- TabOrder = 0
- OnDblClick = lbSelFieldsDblClick
- OnDragDrop = lbFieldsDragDrop
- OnDragOver = lbFieldsDragOver
- end
- object Panel6: TPanel
- Left = 5
- Top = 5
- Width = 127
- Height = 20
- Align = alTop
- BevelOuter = bvNone
- Caption = 'Selected fields'
- TabOrder = 1
- end
- end
- object Panel4: TPanel
- Left = 0
- Top = 205
- Width = 306
- Height = 31
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 3
- object Button1: TButton
- Left = 63
- Top = 3
- Width = 75
- Height = 25
- Caption = 'O&k'
- Default = True
- ModalResult = 1
- TabOrder = 0
- end
- object Button2: TButton
- Left = 167
- Top = 3
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- end
- end
-