home *** CD-ROM | disk | FTP | other *** search
- object ParamForm: TParamForm
- Left = 349
- Top = 177
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Parameter Input'
- ClientHeight = 172
- ClientWidth = 267
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 16
- Top = 48
- Width = 27
- Height = 13
- Caption = '&Type:'
- FocusControl = ParamType
- end
- object Label2: TLabel
- Left = 16
- Top = 76
- Width = 30
- Height = 13
- Caption = '&Value:'
- FocusControl = ParamValue
- end
- object ParamName: TLabel
- Left = 16
- Top = 12
- Width = 189
- Height = 13
- Caption = 'ParamName'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Bevel1: TBevel
- Left = 16
- Top = 32
- Width = 241
- Height = 9
- Shape = bsTopLine
- end
- object ParamType: TComboBox
- Left = 64
- Top = 44
- Width = 193
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'unkown'
- 'string'
- 'small'
- 'integer'
- 'word'
- 'boolean'
- 'float'
- 'currency'
- 'bcd'
- 'date'
- 'time'
- 'datetime'
- 'bytes'
- 'varbytes'
- 'blob'
- 'memo'
- 'graphic')
- TabOrder = 0
- end
- object ParamValue: TEdit
- Left = 64
- Top = 72
- Width = 193
- Height = 21
- TabOrder = 1
- OnChange = ParamValueChange
- end
- object OkBtn: TButton
- Left = 12
- Top = 140
- Width = 89
- Height = 25
- Caption = '&Ok'
- Default = True
- ModalResult = 1
- TabOrder = 3
- end
- object CancelBtn: TButton
- Left = 168
- Top = 140
- Width = 89
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 4
- end
- object ParamNull: TCheckBox
- Left = 64
- Top = 100
- Width = 97
- Height = 17
- Caption = '&Null'
- TabOrder = 2
- end
- end
-