home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 October
/
PCWorld_1999-10_cd2.bin
/
Supreme
/
_SETUP.1
/
Contact.exe
/
0
/
RCDATA
/
TQREXPRESSIONBUILDER
/
TQREXPRESSIONBUILDER.txt
Wrap
Text File
|
1999-09-06
|
12KB
|
578 lines
object QRExpressionBuilder: TQRExpressionBuilder
Left = 178
Top = 124
BorderStyle = bsDialog
Caption = 'Expression Wizard'
ClientHeight = 269
ClientWidth = 376
ParentFont = True
Position = poScreenCenter
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object DataFieldPage: TPanel
Left = 0
Top = 0
Width = 376
Height = 269
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object DataFieldOKBtn: TButton
Left = 252
Top = 233
Width = 49
Height = 21
Caption = 'OK'
TabOrder = 0
OnClick = DataFieldOKBtnClick
end
object DataFieldCancelBtn: TButton
Left = 312
Top = 233
Width = 49
Height = 21
Caption = 'Cancel'
TabOrder = 1
OnClick = DataFieldCancelBtnClick
end
object DataFieldGB: TGroupBox
Left = 18
Top = 10
Width = 343
Height = 205
Caption = 'Insert database field in expression'
TabOrder = 2
object Label2: TLabel
Left = 12
Top = 18
Width = 68
Height = 13
Caption = 'Select dataset'
end
object Label3: TLabel
Left = 12
Top = 60
Width = 70
Height = 13
Caption = 'Available fields'
end
object DataSet: TComboBox
Left = 10
Top = 36
Width = 317
Height = 21
Style = csDropDownList
ItemHeight = 13
Sorted = True
TabOrder = 0
end
object DataField: TListBox
Left = 10
Top = 76
Width = 315
Height = 117
Columns = 2
ItemHeight = 13
Items.Strings = (
'Custno'
'Name'
'Contact'
'Contact-e-mail'
'Address1'
'Address2'
'Address3'
'Address4'
'Country'
'Phone'
'Fax'
'Web'
'Credit-limit'
'Rating'
'Default-Discount'
'OurContact')
TabOrder = 1
end
object GroupBox2: TGroupBox
Left = 0
Top = 0
Width = 343
Height = 205
Caption = 'Insert database field in expression'
TabOrder = 2
object Label4: TLabel
Left = 16
Top = 20
Width = 68
Height = 13
Caption = 'Select dataset'
end
object Label5: TLabel
Left = 186
Top = 20
Width = 70
Height = 13
Caption = 'Available fields'
end
object AvailableFields: TListBox
Left = 184
Top = 40
Width = 139
Height = 150
ItemHeight = 13
TabOrder = 0
OnDblClick = DataFieldOKBtnClick
end
object AvailableDatasets: TListBox
Left = 14
Top = 40
Width = 140
Height = 150
ItemHeight = 13
TabOrder = 1
OnClick = AvailableDatasetsClick
end
end
end
end
object FunctionPage: TPanel
Left = 0
Top = 0
Width = 376
Height = 269
Align = alClient
BevelOuter = bvNone
TabOrder = 2
object FunctionOKBtn: TButton
Left = 252
Top = 233
Width = 49
Height = 21
Caption = 'Continue'
TabOrder = 0
OnClick = FunctionOKBtnClick
end
object FunctionCancelBtn: TButton
Left = 312
Top = 233
Width = 49
Height = 21
Caption = 'Cancel'
TabOrder = 1
OnClick = FunctionCancelBtnClick
end
object GroupBox4: TGroupBox
Left = 18
Top = 10
Width = 343
Height = 205
Caption = 'Select function'
TabOrder = 2
object Label6: TLabel
Left = 18
Top = 22
Width = 42
Height = 13
Caption = 'Category'
end
object Label7: TLabel
Left = 186
Top = 22
Width = 89
Height = 13
Caption = 'Available functions'
end
object FuncName: TLabel
Left = 18
Top = 160
Width = 61
Height = 13
Caption = 'FuncName'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Name = 'Default'
Font.Style = [fsBold]
ParentFont = False
end
object FuncDescription: TLabel
Left = 18
Top = 174
Width = 307
Height = 27
AutoSize = False
Caption = 'FuncDescription'
WordWrap = True
end
object Categories: TListBox
Left = 16
Top = 42
Width = 140
Height = 113
ItemHeight = 13
Items.Strings = (
'All'
'Date & time'
'Math & trig'
'Statistical'
'Database'
'Logical'
'Information'
'Other')
TabOrder = 0
OnClick = CategoriesClick
end
object AvailableFunc: TListBox
Left = 184
Top = 42
Width = 140
Height = 113
ItemHeight = 13
TabOrder = 1
OnClick = AvailableFuncClick
OnDblClick = FunctionOKBtnClick
end
end
end
object FuncParamsPage: TPanel
Left = 0
Top = 0
Width = 376
Height = 269
Align = alClient
BevelOuter = bvNone
TabOrder = 3
object GroupBox3: TGroupBox
Left = 18
Top = 10
Width = 343
Height = 205
Caption = 'Enter parameters for function'
TabOrder = 0
object CopyFuncName: TLabel
Left = 16
Top = 16
Width = 61
Height = 13
Caption = 'FuncName'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Name = 'Default'
Font.Style = [fsBold]
ParentFont = False
end
object CopyFuncDescription: TLabel
Left = 16
Top = 30
Width = 307
Height = 27
AutoSize = False
Caption = 'FuncDescription'
WordWrap = True
end
object FuncParamSB: TScrollBox
Left = 4
Top = 72
Width = 335
Height = 129
BorderStyle = bsNone
TabOrder = 0
end
end
object FuncParamOkBtn: TButton
Left = 252
Top = 233
Width = 49
Height = 21
Caption = 'OK'
TabOrder = 1
OnClick = FuncParamOkBtnClick
end
object FuncArgCancelBtn: TButton
Left = 312
Top = 233
Width = 49
Height = 21
Caption = 'Cancel'
TabOrder = 2
OnClick = FuncArgCancelBtnClick
end
end
object VariablePage: TPanel
Left = 0
Top = 0
Width = 376
Height = 269
Align = alClient
BevelOuter = bvNone
Caption = 'VariablePage'
TabOrder = 4
object GroupBox5: TGroupBox
Left = 18
Top = 10
Width = 343
Height = 205
Caption = 'Select variable'
TabOrder = 0
object VariableValue: TLabel
Left = 54
Top = 180
Width = 65
Height = 13
Caption = 'VariableValue'
end
object Label1: TLabel
Left = 18
Top = 180
Width = 33
Height = 13
Caption = 'Value :'
end
object AvailableVariables: TListBox
Left = 16
Top = 20
Width = 311
Height = 155
ItemHeight = 13
TabOrder = 0
OnClick = AvailableVariablesClick
OnDblClick = VariableOKBtnClick
end
end
object VariableOKBtn: TButton
Left = 252
Top = 233
Width = 49
Height = 21
Caption = 'OK'
TabOrder = 1
OnClick = VariableOKBtnClick
end
object VariableCancelBtn: TButton
Left = 312
Top = 233
Width = 49
Height = 21
Caption = 'Cancel'
TabOrder = 2
OnClick = VariableCancelBtnClick
end
object ModifyVariables: TButton
Left = 20
Top = 233
Width = 111
Height = 21
Caption = '&Modify variables'
TabOrder = 3
OnClick = ModifyVariablesClick
end
end
object MainPage: TPanel
Left = 0
Top = 0
Width = 376
Height = 269
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object Heading: TLabel
Left = 18
Top = 16
Width = 81
Height = 13
Caption = 'Enter expression:'
end
object GroupBox1: TGroupBox
Left = 18
Top = 134
Width = 343
Height = 81
Caption = 'Insert at cursor position'
TabOrder = 0
object InsertDataFieldBtn: TButton
Left = 10
Top = 18
Width = 100
Height = 25
Caption = '&Database field'
TabOrder = 0
OnClick = InsertDataFieldBtnClick
end
object InsertFunctionBtn: TButton
Left = 120
Top = 18
Width = 100
Height = 25
Caption = '&Function'
TabOrder = 1
OnClick = InsertFunctionBtnClick
end
object InsertVariableBtn: TButton
Left = 234
Top = 18
Width = 100
Height = 25
Caption = '&Variable'
TabOrder = 2
OnClick = InsertVariableBtnClick
end
object AddPlus: TButton
Left = 10
Top = 50
Width = 25
Height = 21
Caption = '+'
TabOrder = 3
OnClick = AddSomeClick
end
object AddMinus: TButton
Left = 35
Top = 50
Width = 25
Height = 21
Caption = '-'
TabOrder = 4
OnClick = AddSomeClick
end
object AddMul: TButton
Left = 60
Top = 50
Width = 25
Height = 21
Caption = '*'
TabOrder = 5
OnClick = AddSomeClick
end
object AddDiv: TButton
Left = 85
Top = 50
Width = 25
Height = 21
Caption = '/'
TabOrder = 6
OnClick = AddSomeClick
end
object AddEqual: TButton
Left = 110
Top = 50
Width = 25
Height = 21
Caption = '='
TabOrder = 7
OnClick = AddSomeClick
end
object AddSmaller: TButton
Left = 135
Top = 50
Width = 25
Height = 21
Caption = '<'
TabOrder = 8
OnClick = AddSomeClick
end
object AddLarger: TButton
Left = 160
Top = 50
Width = 25
Height = 21
Caption = '>'
TabOrder = 9
OnClick = AddSomeClick
end
object AddNotEqual: TButton
Left = 185
Top = 50
Width = 25
Height = 21
Caption = '<>'
TabOrder = 10
OnClick = AddSomeClick
end
object AddLessEqual: TButton
Left = 210
Top = 50
Width = 25
Height = 21
Caption = '<='
TabOrder = 11
OnClick = AddSomeClick
end
object AddGreaterEqual: TButton
Left = 235
Top = 50
Width = 25
Height = 21
Caption = '>='
TabOrder = 12
OnClick = AddSomeClick
end
object AddNot: TButton
Left = 260
Top = 50
Width = 25
Height = 21
Caption = 'Not'
TabOrder = 13
OnClick = AddSomeClick
end
object AddAnd: TButton
Left = 285
Top = 50
Width = 25
Height = 21
Caption = 'And'
TabOrder = 14
OnClick = AddSomeClick
end
object AddOr: TButton
Left = 310
Top = 50
Width = 25
Height = 21
Caption = 'Or'
TabOrder = 15
OnClick = AddSomeClick
end
end
object ValidateBtn: TButton
Left = 78
Top = 233
Width = 49
Height = 21
Caption = 'Valida&te'
TabOrder = 1
OnClick = ValidateBtnClick
end
object Clear: TButton
Left = 20
Top = 233
Width = 49
Height = 21
Caption = '&Clear'
TabOrder = 2
OnClick = ClearClick
end
object OK: TButton
Left = 252
Top = 233
Width = 49
Height = 21
Caption = 'OK'
ModalResult = 1
TabOrder = 3
OnClick = OKClick
end
object Cancel: TButton
Left = 312
Top = 233
Width = 49
Height = 21
Caption = 'Cancel'
ModalResult = 2
TabOrder = 4
OnClick = CancelClick
end
end
end