trunk/design/dbFieldLinkPropEditor.lfm

object FieldLinkEditor: TFieldLinkEditor
  Left = 402
  Height = 374
  Top = 251
  Width = 633
  BorderStyle = bsDialog
  Caption = 'Field Link Editor'
  ClientHeight = 374
  ClientWidth = 633
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '1.8.1.0'
  object Bevel1: TBevel
    Left = 8
    Height = 316
    Top = 16
    Width = 612
    Anchors = [akTop, akLeft, akRight, akBottom]
  end
  object Button1: TButton
    Left = 545
    Height = 30
    Top = 340
    Width = 75
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 0
  end
  object OKButton: TButton
    Left = 453
    Height = 30
    Top = 340
    Width = 72
    Anchors = [akRight, akBottom]
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 1
  end
  object Label2: TLabel
    Left = 20
    Height = 14
    Top = 28
    Width = 109
    Caption = 'Detail Index Fields'
    ParentColor = False
  end
  object DetailedFieldListBox: TListBox
    Left = 20
    Height = 136
    Top = 43
    Width = 304
    ItemHeight = 0
    OnSelectionChange = DetailedFieldListBoxSelectionChange
    ScrollWidth = 302
    TabOrder = 2
    TopIndex = -1
  end
  object Label3: TLabel
    Left = 435
    Height = 14
    Top = 31
    Width = 77
    Anchors = [akTop, akRight]
    Caption = 'Master Fields'
    ParentColor = False
  end
  object MasterFieldListBox: TListBox
    Left = 435
    Height = 136
    Top = 45
    Width = 176
    Anchors = [akTop, akRight]
    ItemHeight = 0
    OnSelectionChange = MasterFieldListBoxSelectionChange
    ScrollWidth = 174
    TabOrder = 3
    TopIndex = -1
  end
  object JoinButton: TButton
    Left = 340
    Height = 30
    Top = 99
    Width = 75
    Caption = 'Join'
    OnClick = JoinButtonClick
    TabOrder = 4
  end
  object Label4: TLabel
    Left = 20
    Height = 14
    Top = 216
    Width = 74
    Caption = 'Joined Fields'
    ParentColor = False
  end
  object DeleteButton: TButton
    Left = 531
    Height = 30
    Top = 232
    Width = 75
    Anchors = [akTop, akRight]
    Caption = 'Delete'
    OnClick = DeleteButtonClick
    TabOrder = 5
  end
  object JoinedFields: TListBox
    Left = 21
    Height = 84
    Top = 232
    Width = 500
    Anchors = [akTop, akLeft, akRight, akBottom]
    ItemHeight = 0
    ScrollWidth = 498
    TabOrder = 6
    TopIndex = -1
  end
  object JoinHint: TLabel
    Left = 20
    Height = 14
    Top = 187
    Width = 54
    Caption = 'JoinHint'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
end
Revision:	81
Committed:	Mon Jan 1 11:31:10 2018 UTC (6 years, 10 months ago) by tony
File size:	2566 byte(s)
Log Message:	Protect missing database name error in property editor
#	User	Rev	Content
1	tony	19	object FieldLinkEditor: TFieldLinkEditor
2			Left = 402
3			Height = 374
4			Top = 251
5			Width = 633
6			BorderStyle = bsDialog
7			Caption = 'Field Link Editor'
8			ClientHeight = 374
9			ClientWidth = 633
10			OnShow = FormShow
11	tony	67	Position = poScreenCenter
12	tony	81	LCLVersion = '1.8.1.0'
13	tony	19	object Bevel1: TBevel
14			Left = 8
15			Height = 316
16			Top = 16
17			Width = 612
18			Anchors = [akTop, akLeft, akRight, akBottom]
19			end
20			object Button1: TButton
21			Left = 545
22			Height = 30
23			Top = 340
24			Width = 75
25			Anchors = [akRight, akBottom]
26			Cancel = True
27			Caption = 'Cancel'
28			ModalResult = 2
29			TabOrder = 0
30			end
31			object OKButton: TButton
32			Left = 453
33			Height = 30
34			Top = 340
35			Width = 72
36			Anchors = [akRight, akBottom]
37			Caption = 'OK'
38			Default = True
39			ModalResult = 1
40			TabOrder = 1
41			end
42			object Label2: TLabel
43			Left = 20
44	tony	67	Height = 14
45	tony	19	Top = 28
46			Width = 109
47			Caption = 'Detail Index Fields'
48			ParentColor = False
49			end
50			object DetailedFieldListBox: TListBox
51			Left = 20
52			Height = 136
53			Top = 43
54			Width = 304
55			ItemHeight = 0
56			OnSelectionChange = DetailedFieldListBoxSelectionChange
57			ScrollWidth = 302
58			TabOrder = 2
59			TopIndex = -1
60			end
61			object Label3: TLabel
62			Left = 435
63	tony	67	Height = 14
64	tony	19	Top = 31
65			Width = 77
66			Anchors = [akTop, akRight]
67			Caption = 'Master Fields'
68			ParentColor = False
69			end
70			object MasterFieldListBox: TListBox
71			Left = 435
72			Height = 136
73			Top = 45
74			Width = 176
75			Anchors = [akTop, akRight]
76			ItemHeight = 0
77			OnSelectionChange = MasterFieldListBoxSelectionChange
78			ScrollWidth = 174
79			TabOrder = 3
80			TopIndex = -1
81			end
82			object JoinButton: TButton
83			Left = 340
84			Height = 30
85			Top = 99
86			Width = 75
87			Caption = 'Join'
88			OnClick = JoinButtonClick
89			TabOrder = 4
90			end
91			object Label4: TLabel
92			Left = 20
93	tony	67	Height = 14
94	tony	19	Top = 216
95			Width = 74
96			Caption = 'Joined Fields'
97			ParentColor = False
98			end
99			object DeleteButton: TButton
100			Left = 531
101			Height = 30
102			Top = 232
103			Width = 75
104			Anchors = [akTop, akRight]
105			Caption = 'Delete'
106			OnClick = DeleteButtonClick
107			TabOrder = 5
108			end
109			object JoinedFields: TListBox
110			Left = 21
111			Height = 84
112			Top = 232
113			Width = 500
114			Anchors = [akTop, akLeft, akRight, akBottom]
115			ItemHeight = 0
116			ScrollWidth = 498
117			TabOrder = 6
118			TopIndex = -1
119			end
120			object JoinHint: TLabel
121			Left = 20
122	tony	67	Height = 14
123	tony	19	Top = 187
124			Width = 54
125			Caption = 'JoinHint'
126			Font.Style = [fsBold]
127			ParentColor = False
128			ParentFont = False
129			end
130			end