home *** CD-ROM | disk | FTP | other *** search
- object LinkFields: TLinkFields
- Left = 235
- Top = 123
- ActiveControl = IndexList
- BorderStyle = bsDialog
- Caption = 'Field Link Designer'
- ClientHeight = 273
- ClientWidth = 352
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- OnClick = IndexListChange
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- TextHeight = 13
- object Bevel1: TBevel
- Left = 4
- Top = 33
- Width = 344
- Height = 198
- Shape = bsFrame
- end
- object Bevel2: TBevel
- Left = 350
- Top = 285
- Width = 341
- Height = 43
- Shape = bsFrame
- end
- object Label30: TLabel
- Left = 12
- Top = 40
- Width = 71
- Height = 13
- Caption = 'D&etail Fields'
- FocusControl = DetailList
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- IsControl = True
- end
- object Label31: TLabel
- Left = 224
- Top = 38
- Width = 76
- Height = 13
- Caption = '&Master Fields'
- FocusControl = MasterList
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- IsControl = True
- end
- object IndexLabel: TLabel
- Left = 12
- Top = 10
- Width = 101
- Height = 13
- Caption = 'A&vailable Indexes'
- FocusControl = IndexList
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 12
- Top = 142
- Width = 75
- Height = 13
- Caption = '&Joined Fields'
- FocusControl = BindList
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object DetailList: TListBox
- Left = 13
- Top = 55
- Width = 117
- Height = 80
- IntegralHeight = True
- ItemHeight = 13
- TabOrder = 1
- OnClick = BindingListClick
- IsControl = True
- end
- object MasterList: TListBox
- Left = 222
- Top = 54
- Width = 117
- Height = 80
- IntegralHeight = True
- ItemHeight = 13
- TabOrder = 3
- OnClick = BindingListClick
- IsControl = True
- end
- object BindList: TListBox
- Left = 12
- Top = 157
- Width = 242
- Height = 67
- IntegralHeight = True
- ItemHeight = 13
- MultiSelect = True
- TabOrder = 4
- OnClick = BindListClick
- IsControl = True
- end
- object IndexList: TComboBox
- Left = 120
- Top = 7
- Width = 192
- Height = 20
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = IndexListChange
- OnClick = IndexListChange
- end
- object BitBtn1: TBitBtn
- Left = 54
- Top = 239
- Width = 77
- Height = 27
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 7
- OnClick = BitBtn1Click
- Kind = bkOK
- end
- object BitBtn2: TBitBtn
- Left = 137
- Top = 239
- Width = 77
- Height = 27
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 8
- Kind = bkCancel
- end
- object AddButton: TBitBtn
- Left = 138
- Top = 78
- Width = 77
- Height = 27
- Caption = '&Add'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- OnClick = AddButtonClick
- end
- object DeleteButton: TBitBtn
- Left = 262
- Top = 156
- Width = 77
- Height = 27
- Caption = '&Delete'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 5
- OnClick = DeleteButtonClick
- end
- object ClearButton: TBitBtn
- Left = 262
- Top = 191
- Width = 77
- Height = 27
- Caption = '&Clear'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 6
- OnClick = ClearButtonClick
- end
- object HelpBtn: TBitBtn
- Left = 220
- Top = 239
- Width = 77
- Height = 27
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 9
- Kind = bkHelp
- Margin = 2
- Spacing = -1
- end
- object Table1: TTable
- DatabaseName = 'Paradox'
- TableName = 'ORDERS'
- Left = 148
- Top = 121
- end
- end
-