1object NewFieldFrm: TNewFieldFrm
2  Left = 447
3  Height = 493
4  Top = 271
5  Width = 600
6  HorzScrollBar.Page = 261
7  VertScrollBar.Page = 375
8  AutoSize = True
9  Caption = 'Dialog'
10  ClientHeight = 493
11  ClientWidth = 600
12  Constraints.MinWidth = 600
13  DesignTimePPI = 120
14  OnClose = FormClose
15  OnCreate = FormCreate
16  Position = poScreenCenter
17  object ButtonPanel1: TButtonPanel
18    AnchorSideLeft.Control = Owner
19    AnchorSideTop.Control = GroupBox2
20    AnchorSideTop.Side = asrBottom
21    AnchorSideRight.Control = Owner
22    AnchorSideRight.Side = asrBottom
23    Left = 6
24    Height = 30
25    Top = 457
26    Width = 588
27    Align = alNone
28    Anchors = [akTop, akLeft, akRight]
29    OKButton.Name = 'OKButton'
30    OKButton.DefaultCaption = True
31    HelpButton.Name = 'HelpButton'
32    HelpButton.DefaultCaption = True
33    CloseButton.Name = 'CloseButton'
34    CloseButton.DefaultCaption = True
35    CancelButton.Name = 'CancelButton'
36    CancelButton.DefaultCaption = True
37    TabOrder = 0
38    ShowButtons = [pbOK, pbCancel]
39    ShowBevel = False
40  end
41  object RadioGroup1: TRadioGroup
42    AnchorSideRight.Side = asrBottom
43    Left = 6
44    Height = 73
45    Top = 6
46    Width = 588
47    Align = alTop
48    AutoFill = True
49    AutoSize = True
50    BorderSpacing.Left = 6
51    BorderSpacing.Top = 6
52    BorderSpacing.Right = 6
53    BorderSpacing.InnerBorder = 6
54    Caption = 'Field Type'
55    ChildSizing.LeftRightSpacing = 6
56    ChildSizing.TopBottomSpacing = 6
57    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
58    ChildSizing.EnlargeVertical = crsHomogenousChildResize
59    ChildSizing.ShrinkHorizontal = crsScaleChilds
60    ChildSizing.ShrinkVertical = crsScaleChilds
61    ChildSizing.Layout = cclLeftToRightThenTopToBottom
62    ChildSizing.ControlsPerLine = 3
63    ClientHeight = 48
64    ClientWidth = 584
65    Columns = 3
66    ItemIndex = 0
67    Items.Strings = (
68      '&Data'
69      '&Calculated'
70      '&Lookup'
71    )
72    OnClick = RadioGroup1Click
73    ParentFont = False
74    TabOrder = 1
75  end
76  object NoteLbl: TLabel
77    AnchorSideLeft.Control = RadioGroup1
78    AnchorSideTop.Control = RadioGroup1
79    AnchorSideTop.Side = asrBottom
80    AnchorSideRight.Control = RadioGroup1
81    AnchorSideRight.Side = asrBottom
82    Left = 6
83    Height = 20
84    Top = 85
85    Width = 588
86    Anchors = [akTop, akLeft, akRight]
87    BorderSpacing.Top = 6
88    Caption = 'NoteLbl'
89    ParentFont = False
90    Visible = False
91    WordWrap = True
92  end
93  object GroupBox1: TGroupBox
94    AnchorSideLeft.Control = RadioGroup1
95    AnchorSideTop.Control = NoteLbl
96    AnchorSideTop.Side = asrBottom
97    AnchorSideRight.Control = RadioGroup1
98    AnchorSideRight.Side = asrBottom
99    Left = 6
100    Height = 167
101    Top = 111
102    Width = 588
103    Anchors = [akTop, akLeft, akRight]
104    AutoSize = True
105    BorderSpacing.Top = 6
106    BorderSpacing.InnerBorder = 6
107    Caption = 'Field properties'
108    ClientHeight = 142
109    ClientWidth = 584
110    ParentFont = False
111    TabOrder = 2
112    object Label1: TLabel
113      AnchorSideLeft.Control = GroupBox1
114      AnchorSideBottom.Control = EditName
115      AnchorSideBottom.Side = asrBottom
116      Left = 6
117      Height = 20
118      Top = 8
119      Width = 43
120      Anchors = [akLeft, akBottom]
121      BorderSpacing.Left = 6
122      Caption = '&Name:'
123      FocusControl = EditName
124      ParentFont = False
125    end
126    object Label2: TLabel
127      AnchorSideLeft.Control = GroupBox1
128      AnchorSideBottom.Control = SelectType
129      AnchorSideBottom.Side = asrBottom
130      Left = 6
131      Height = 20
132      Top = 76
133      Width = 34
134      Anchors = [akLeft, akBottom]
135      BorderSpacing.Left = 6
136      Caption = '&Type:'
137      FocusControl = SelectType
138      ParentFont = False
139    end
140    object Label3: TLabel
141      AnchorSideLeft.Control = GroupBox1
142      AnchorSideBottom.Control = EditSize
143      AnchorSideBottom.Side = asrBottom
144      Left = 6
145      Height = 20
146      Top = 110
147      Width = 30
148      Anchors = [akLeft, akBottom]
149      BorderSpacing.Left = 6
150      Caption = '&Size:'
151      FocusControl = EditSize
152      ParentFont = False
153    end
154    object EditName: TEdit
155      AnchorSideLeft.Control = Label8
156      AnchorSideLeft.Side = asrBottom
157      AnchorSideTop.Control = GroupBox1
158      AnchorSideRight.Control = GroupBox1
159      AnchorSideRight.Side = asrBottom
160      Left = 293
161      Height = 28
162      Top = 0
163      Width = 285
164      Anchors = [akTop, akLeft, akRight]
165      BorderSpacing.Right = 6
166      OnChange = EditNameChange
167      ParentFont = False
168      ParentShowHint = False
169      ShowHint = True
170      TabOrder = 0
171    end
172    object SelectType: TComboBox
173      AnchorSideLeft.Control = Label8
174      AnchorSideLeft.Side = asrBottom
175      AnchorSideTop.Control = EditCompName
176      AnchorSideTop.Side = asrBottom
177      AnchorSideRight.Control = GroupBox1
178      AnchorSideRight.Side = asrBottom
179      Left = 293
180      Height = 28
181      Top = 68
182      Width = 285
183      Anchors = [akTop, akLeft, akRight]
184      BorderSpacing.Top = 6
185      BorderSpacing.Right = 6
186      ItemHeight = 20
187      Items.Strings = (
188        'String'
189        'Integer'
190        'SmallInt'
191        'Word'
192        'Float'
193        'Currency'
194        'Boolean'
195        'Date'
196        'Time'
197        'DateTime'
198        'Blob'
199        'Memo'
200        'Graphic'
201        'LargeInt'
202      )
203      OnChange = SelectTypeChange
204      ParentFont = False
205      Style = csDropDownList
206      TabOrder = 2
207    end
208    object EditSize: TEdit
209      AnchorSideLeft.Control = Label8
210      AnchorSideLeft.Side = asrBottom
211      AnchorSideTop.Control = SelectType
212      AnchorSideTop.Side = asrBottom
213      AnchorSideRight.Control = GroupBox1
214      AnchorSideRight.Side = asrBottom
215      Left = 293
216      Height = 28
217      Top = 102
218      Width = 285
219      Anchors = [akTop, akLeft, akRight]
220      BorderSpacing.Top = 6
221      BorderSpacing.Right = 6
222      Color = clBtnFace
223      Enabled = False
224      ParentFont = False
225      TabOrder = 3
226    end
227    object Label7: TLabel
228      AnchorSideLeft.Control = GroupBox1
229      AnchorSideBottom.Control = EditCompName
230      AnchorSideBottom.Side = asrBottom
231      Left = 6
232      Height = 20
233      Top = 42
234      Width = 125
235      Anchors = [akLeft, akBottom]
236      BorderSpacing.Left = 6
237      Caption = 'Co&mponent Name:'
238      FocusControl = EditCompName
239      ParentFont = False
240    end
241    object EditCompName: TEdit
242      AnchorSideLeft.Control = Label8
243      AnchorSideLeft.Side = asrBottom
244      AnchorSideTop.Control = EditName
245      AnchorSideTop.Side = asrBottom
246      AnchorSideRight.Control = GroupBox1
247      AnchorSideRight.Side = asrBottom
248      Left = 293
249      Height = 28
250      Top = 34
251      Width = 285
252      Anchors = [akTop, akLeft, akRight]
253      BorderSpacing.Top = 6
254      BorderSpacing.Right = 6
255      OnChange = EditCompNameChange
256      ParentFont = False
257      ParentShowHint = False
258      ShowHint = True
259      TabOrder = 1
260    end
261    object Label8: TLabel
262      AnchorSideLeft.Control = GroupBox1
263      AnchorSideLeft.Side = asrCenter
264      AnchorSideTop.Control = GroupBox1
265      Left = 292
266      Height = 1
267      Top = 0
268      Width = 1
269      ParentFont = False
270    end
271  end
272  object GroupBox2: TGroupBox
273    AnchorSideLeft.Control = RadioGroup1
274    AnchorSideTop.Control = GroupBox1
275    AnchorSideTop.Side = asrBottom
276    AnchorSideRight.Control = RadioGroup1
277    AnchorSideRight.Side = asrBottom
278    Left = 6
279    Height = 167
280    Top = 284
281    Width = 588
282    Anchors = [akTop, akLeft, akRight]
283    AutoSize = True
284    BorderSpacing.Top = 6
285    BorderSpacing.InnerBorder = 6
286    Caption = 'Lookup definition'
287    ClientHeight = 142
288    ClientWidth = 584
289    ParentFont = False
290    TabOrder = 3
291    object Label4: TLabel
292      AnchorSideLeft.Control = GroupBox2
293      AnchorSideBottom.Control = SelectKeyFields
294      AnchorSideBottom.Side = asrBottom
295      Left = 6
296      Height = 20
297      Top = 8
298      Width = 64
299      Anchors = [akLeft, akBottom]
300      BorderSpacing.Left = 6
301      Caption = '&Key fields'
302      FocusControl = SelectKeyFields
303      ParentFont = False
304    end
305    object Label5: TLabel
306      AnchorSideLeft.Control = GroupBox2
307      AnchorSideBottom.Control = SelectLookupKeys
308      AnchorSideBottom.Side = asrBottom
309      Left = 6
310      Height = 20
311      Top = 76
312      Width = 81
313      Anchors = [akLeft, akBottom]
314      BorderSpacing.Left = 6
315      Caption = 'L&ookup keys'
316      FocusControl = SelectLookupKeys
317      ParentFont = False
318    end
319    object Label6: TLabel
320      AnchorSideLeft.Control = GroupBox2
321      AnchorSideBottom.Control = SelectResultField
322      AnchorSideBottom.Side = asrBottom
323      Left = 6
324      Height = 20
325      Top = 110
326      Width = 82
327      Anchors = [akLeft, akBottom]
328      BorderSpacing.Left = 6
329      Caption = '&Result Fields'
330      FocusControl = SelectResultField
331      ParentFont = False
332    end
333    object Label10: TLabel
334      AnchorSideLeft.Control = GroupBox2
335      AnchorSideBottom.Control = DataSetsCombo
336      AnchorSideBottom.Side = asrBottom
337      Left = 6
338      Height = 20
339      Top = 42
340      Width = 51
341      Anchors = [akLeft, akBottom]
342      BorderSpacing.Left = 6
343      Caption = 'Dataset'
344      ParentFont = False
345    end
346    object SelectKeyFields: TComboBox
347      AnchorSideLeft.Control = Label9
348      AnchorSideLeft.Side = asrBottom
349      AnchorSideTop.Control = GroupBox2
350      AnchorSideRight.Control = GroupBox2
351      AnchorSideRight.Side = asrBottom
352      Left = 293
353      Height = 28
354      Top = 0
355      Width = 285
356      Anchors = [akTop, akLeft, akRight]
357      BorderSpacing.Right = 6
358      ItemHeight = 20
359      OnChange = SelectKeyFieldsChange
360      ParentFont = False
361      ParentShowHint = False
362      ShowHint = True
363      TabOrder = 0
364    end
365    object SelectLookupKeys: TComboBox
366      AnchorSideLeft.Control = DataSetsCombo
367      AnchorSideTop.Control = DataSetsCombo
368      AnchorSideTop.Side = asrBottom
369      AnchorSideRight.Control = GroupBox2
370      AnchorSideRight.Side = asrBottom
371      Left = 293
372      Height = 28
373      Top = 68
374      Width = 285
375      Anchors = [akTop, akLeft, akRight]
376      BorderSpacing.Top = 6
377      BorderSpacing.Right = 6
378      Enabled = False
379      ItemHeight = 20
380      OnChange = SelectLookupKeysChange
381      ParentFont = False
382      TabOrder = 2
383    end
384    object SelectResultField: TComboBox
385      AnchorSideLeft.Control = Label9
386      AnchorSideTop.Control = SelectLookupKeys
387      AnchorSideTop.Side = asrBottom
388      AnchorSideRight.Control = GroupBox2
389      AnchorSideRight.Side = asrBottom
390      Left = 292
391      Height = 28
392      Top = 102
393      Width = 286
394      Anchors = [akTop, akLeft, akRight]
395      BorderSpacing.Top = 6
396      BorderSpacing.Right = 6
397      Enabled = False
398      ItemHeight = 20
399      OnChange = SelectResultFieldChange
400      ParentFont = False
401      TabOrder = 3
402    end
403    object DataSetsCombo: TComboBox
404      AnchorSideLeft.Control = Label9
405      AnchorSideLeft.Side = asrBottom
406      AnchorSideTop.Control = SelectKeyFields
407      AnchorSideTop.Side = asrBottom
408      AnchorSideRight.Control = GroupBox2
409      AnchorSideRight.Side = asrBottom
410      Left = 293
411      Height = 28
412      Top = 34
413      Width = 285
414      Anchors = [akTop, akLeft, akRight]
415      BorderSpacing.Top = 6
416      BorderSpacing.Right = 6
417      ItemHeight = 20
418      OnChange = DataSetsComboChange
419      ParentFont = False
420      ParentShowHint = False
421      ShowHint = True
422      Style = csDropDownList
423      TabOrder = 1
424    end
425    object Label9: TLabel
426      AnchorSideLeft.Control = GroupBox2
427      AnchorSideLeft.Side = asrCenter
428      AnchorSideTop.Control = GroupBox2
429      Left = 292
430      Height = 1
431      Top = 0
432      Width = 1
433      ParentFont = False
434    end
435  end
436end
437