home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 1996 August
/
VPR9608A.BIN
/
del20try
/
install
/
data.z
/
FILTER1.DFM
/
FILTER1.txt
Wrap
Text File
|
1996-05-08
|
3KB
|
162 lines
object fmFilterFrm: TfmFilterFrm
Left = 225
Top = 110
ActiveControl = Memo1
BorderStyle = bsSingle
Caption = 'Filter Condition'
ClientHeight = 251
ClientWidth = 279
Font.Color = clBlack
Font.Height = -12
Font.Name = 'ソスlソスr ソスoソスSソスVソスbソスN'
Font.Style = []
Font.Charset = 128
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object Label1: TLabel
Left = 7
Top = 114
Width = 31
Height = 12
Caption = '&Fields'
FocusControl = ListBox1
end
object Label2: TLabel
Left = 7
Top = 44
Width = 48
Height = 12
Caption = '&Condition'
end
object Label3: TLabel
Left = 143
Top = 114
Width = 50
Height = 12
Caption = '&Operators'
end
object Label4: TLabel
Left = 7
Top = 7
Width = 19
Height = 12
Caption = '&List'
FocusControl = ComboBox1
end
object ListBox1: TListBox
Left = 7
Top = 127
Width = 130
Height = 61
Hint = 'Doubleclick to add'
TabStop = False
ItemHeight = 12
ParentShowHint = False
ShowHint = True
Sorted = True
TabOrder = 2
OnDblClick = AddFieldName
end
object ListBox2: TListBox
Left = 143
Top = 127
Width = 61
Height = 117
Hint = 'Double-click to add'
TabStop = False
ItemHeight = 12
Items.Strings = (
'>'
'<'
'= '
'>='
'<='
'<>'
'AND'
'OR'
'('
')')
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnDblClick = ListBox2DblClick
end
object Memo1: TMemo
Left = 7
Top = 58
Width = 266
Height = 54
TabOrder = 1
OnChange = Memo1Change
end
object GroupBox1: TGroupBox
Left = 10
Top = 193
Width = 127
Height = 51
Caption = 'F&ilter Options'
TabOrder = 4
object cbCaseSensitive: TCheckBox
Left = 7
Top = 13
Width = 98
Height = 15
Caption = 'Case Sensitive'
TabOrder = 0
OnClick = cbCaseSensitiveClick
end
object cbPartialCompare: TCheckBox
Left = 7
Top = 30
Width = 114
Height = 14
Caption = 'Partial Comparison'
TabOrder = 1
OnClick = cbPartialCompareClick
end
end
object ComboBox1: TComboBox
Left = 7
Top = 20
Width = 266
Height = 20
Cursor = crArrow
ItemHeight = 12
Items.Strings = (
'Country <> '#39'US'#39
'Country = '#39'US'#39
'LastInvoiceDate >= '#39'9/30/94'#39' '
'Country = '#39'US'#39' and LastInvoiceDate > '#39'6/30/94'#39)
TabOrder = 0
OnChange = ComboBox1Change
end
object BtnApplyFilter: TButton
Left = 209
Top = 126
Width = 63
Height = 21
Caption = '&Apply'
TabOrder = 5
OnClick = ApplyFilter
end
object BtnClear: TButton
Left = 209
Top = 151
Width = 63
Height = 21
Caption = 'Cl&ear'
TabOrder = 6
OnClick = SBtnClearClick
end
object BtnClose: TButton
Left = 209
Top = 220
Width = 63
Height = 21
Caption = 'Cl&ose'
TabOrder = 7
OnClick = SBtnCloseClick
end
end