home *** CD-ROM | disk | FTP | other *** search
- object frmDefinedField: TfrmDefinedField
- Left = 90
- Top = 112
- BorderStyle = bsDialog
- Caption = 'Field Definition'
- ClientHeight = 199
- ClientWidth = 458
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 16
- object Label1: TLabel
- Left = 10
- Top = 27
- Width = 113
- Height = 16
- Caption = '&Field Display Name'
- FocusControl = EditFieldName
- end
- object Label2: TLabel
- Left = 10
- Top = 78
- Width = 190
- Height = 16
- Caption = '&Expression that defines the Field'
- FocusControl = EditExpression
- end
- object Label3: TLabel
- Left = 281
- Top = 27
- Width = 59
- Height = 16
- Caption = '&Data Type'
- FocusControl = ComboDataType
- end
- object Label4: TLabel
- Left = 150
- Top = 0
- Width = 157
- Height = 16
- Caption = 'Enter the field definition.'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- end
- object EditFieldName: TEdit
- Left = 10
- Top = 45
- Width = 247
- Height = 24
- TabOrder = 0
- end
- object ComboDataType: TComboBox
- Left = 281
- Top = 45
- Width = 169
- Height = 24
- Style = csDropDownList
- ItemHeight = 16
- Items.Strings = (
- 'Unknown'
- 'String'
- 'Smallint'
- 'Integer '
- 'Word'
- 'Boolean'
- 'Float'
- 'Currency'
- 'BCD'
- 'Date'
- 'Time'
- 'DateTime'
- 'Bytes'
- 'VarBytes')
- TabOrder = 1
- end
- object BitBtn1: TBitBtn
- Left = 133
- Top = 165
- Width = 90
- Height = 29
- TabOrder = 2
- OnClick = BitBtn1Click
- Kind = bkOK
- Style = bsNew
- end
- object BitBtn2: TBitBtn
- Left = 235
- Top = 165
- Width = 90
- Height = 29
- TabOrder = 3
- Kind = bkCancel
- Style = bsNew
- end
- object EditExpression: TBtnEdit
- Left = 10
- Top = 97
- Width = 440
- Height = 24
- AutoSize = False
- Glyph.Data = {
- DE000000424DDE00000000000000360000002800000009000000060000000100
- 180000000000A800000000000000000000000000000000000000007F7F007F7F
- 007F7F007F7F007F7F007F7F007F7F007F7F007F7F00007F7F007F7F007F7F00
- 7F7F007F7F007F7F007F7F007F7F007F7F00000000000000007F7F0000000000
- 00007F7F000000000000007F7F00000000000000007F7F000000000000007F7F
- 000000000000007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
- 7F7F007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
- 7F00}
- TabOrder = 4
- OnBtnClick = EditExpressionBtnClick
- end
- object cboxAutoselect: TCheckBox
- Left = 145
- Top = 128
- Width = 168
- Height = 17
- Caption = '&Automatically select field'
- State = cbChecked
- TabOrder = 5
- end
- end
-