home *** CD-ROM | disk | FTP | other *** search
- object frmExpBuilder: TfrmExpBuilder
- Left = 13
- Top = 56
- HelpContext = 2020
- BorderStyle = bsDialog
- Caption = 'Expression Builder'
- ClientHeight = 317
- ClientWidth = 610
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 16
- object Bevel1: TBevel
- Left = 0
- Top = 0
- Width = 610
- Height = 241
- Align = alTop
- Shape = bsBottomLine
- end
- object Label1: TLabel
- Left = 68
- Top = 2
- Width = 70
- Height = 18
- Caption = 'Functions'
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 229
- Top = 2
- Width = 72
- Height = 18
- Caption = 'Operators'
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 409
- Top = 2
- Width = 111
- Height = 18
- Caption = 'Fields Available'
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 78
- Top = 208
- Width = 454
- Height = 30
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'To insert any function, operator or field into the expression, d' +
- 'ouble click the required item. If any of the expression text is ' +
- 'already selected it will be replaced.'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object EditExpression: TEdit
- Left = 5
- Top = 252
- Width = 598
- Height = 24
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- Text = 'EditExpression'
- end
- object BitBtn1: TBitBtn
- Left = 162
- Top = 287
- Width = 88
- Height = 30
- TabOrder = 1
- Kind = bkOK
- Style = bsNew
- end
- object BitBtn2: TBitBtn
- Left = 261
- Top = 287
- Width = 88
- Height = 30
- TabOrder = 2
- Kind = bkCancel
- Style = bsNew
- end
- object BitBtn3: TBitBtn
- Left = 360
- Top = 287
- Width = 88
- Height = 30
- TabOrder = 3
- Kind = bkHelp
- Style = bsNew
- end
- object lbFunctions: TListBox
- Left = 6
- Top = 20
- Width = 216
- Height = 182
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 16
- Items.Strings = (
- 'AVG( field_name ) '
- 'COUNT( field_name ) '
- 'EXTRACT( extract_field FROM field_name ) '
- 'LOWER( field_name ) '
- 'MAX( field_name ) '
- 'MIN( field_name ) '
- 'SUBSTRING( field_name FROM Start_Pos FOR Length ) '
- 'SUM( field_name ) '
- 'TRIM( field_name ) '
- 'UPPER( field_name )'
- ' ')
- ParentFont = False
- TabOrder = 4
- OnDblClick = lbFunctionsDblClick
- end
- object lbOperators: TListBox
- Left = 228
- Top = 20
- Width = 90
- Height = 182
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 16
- Items.Strings = (
- '+'
- '-'
- '*'
- '/'
- '('
- ')'
- '='
- '<'
- '<='
- '>'
- '>='
- '<>'
- 'IS NULL'
- 'LIKE'
- 'IN (set)'
- ''
- 'AND'
- 'OR'
- 'NOT'
- '||')
- ParentFont = False
- TabOrder = 5
- OnDblClick = lbFunctionsDblClick
- end
- object lbFieldsAvailable: TListBox
- Left = 322
- Top = 20
- Width = 281
- Height = 182
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 6
- OnDblClick = lbFunctionsDblClick
- end
- end
-